From 84adefa331c4159d432d22840663c38f155cd4c1 Mon Sep 17 00:00:00 2001 From: Erlang/OTP Date: Fri, 20 Nov 2009 14:54:40 +0000 Subject: The R13B03 release. --- lib/stdlib/test/escript_SUITE_data/filesize | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100755 lib/stdlib/test/escript_SUITE_data/filesize (limited to 'lib/stdlib/test/escript_SUITE_data/filesize') diff --git a/lib/stdlib/test/escript_SUITE_data/filesize b/lib/stdlib/test/escript_SUITE_data/filesize new file mode 100755 index 0000000000..fd211c55cd --- /dev/null +++ b/lib/stdlib/test/escript_SUITE_data/filesize @@ -0,0 +1,11 @@ +#!/usr/bin/env escript +%% -*- erlang -*- +-include_lib("kernel/include/file.hrl"). + +main([Filename]) -> + {ok,#file_info{size=Size}} = file:read_file_info(Filename), + io:format("~p\n", [Size]). + +%% Deliberate warning follows so that we can check that line numbers +%% correct after an -include_lib directive. +id(I) -> I. -- cgit v1.2.3