mirrors/eiffel-org
1
0
Fork 0
mirror of https://github.com/EiffelSoftware/eiffel-org.git synced 2026-04-05 01:29:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

Author:halw

Browse Source 
Date:2008-12-10T05:18:46.000000Z


git-svn-id: https://svn.eiffel.com/eiffel-org/trunk@133 abb3cda0-5349-4a8f-a601-0c33ac3a8c38
This commit is contained in:
halw
2008-12-10 05:18:46 +00:00
parent 4d6df90e6c
commit b6b710335c
3 changed files with 94 additions and 93 deletions
Download Patch File Download Diff File Expand all files Collapse all files

56
documentation/current/solutions/text-processing/eiffellex/eiffellex-sample/eiffel-scanner/eiffel-scan-console-input.wiki
View File

@@ -11,41 +11,41 @@ class EIFFEL_SCAN
inherit
SCANNING
rename
make as scanning_make
end;
SCANNING
rename
make as scanning_make
end;
ARGUMENTS
undefine
copy, consistent, is_equal, setup
end
ARGUMENTS
undefine
copy, consistent, is_equal, setup
end
create
make
make
feature
make is
-- Create a lexical analyser for Eiffel if none,
-- then use it to analyze the file of name
-- `file_name'.
local
file_name: STRING;
do
if argument_count < 1 then
io.error.putstring ("Usage: eiffel_scan eiffel_class_file.e%N")
else
file_name := argument (1);
scanning_make;
build ("eiffel_lex", "eiffel_regular");
io.putstring ("Scanning file `");
io.putstring (file_name);
io.putstring ("'.%N");
analyze (file_name)
end
end -- make
make
-- Create a lexical analyser for Eiffel if none,
-- then use it to analyze the file of name
-- `file_name'.
local
file_name: STRING;
do
if argument_count < 1 then
io.error.putstring ("Usage: eiffel_scan eiffel_class_file.e%N")
else
file_name := argument (1);
scanning_make;
build ("eiffel_lex", "eiffel_regular");
io.putstring ("Scanning file `");
io.putstring (file_name);
io.putstring ("'.%N");
analyze (file_name)
end
end -- make
end -- class EIFFEL_SCAN
</code>

76
documentation/current/solutions/text-processing/eiffellex/eiffellex-sample/eiffel-scanner/eiffel-scan-text.wiki
View File

@@ -3,51 +3,51 @@
[[Property:uuid|092bd183-2fc4-ae65-02b9-d66933492a50]]
<code>
class
EIFFEL_SCAN
class
EIFFEL_SCAN
inherit
SCANNING
rename
make as scanning_make
end
inherit
SCANNING
rename
make as scanning_make
end
ARGUMENTS
undefine
copy,
consistent,
is_equal,
setup
end
ARGUMENTS
undefine
copy,
consistent,
is_equal,
setup
end
create
make
create
make
feature
feature
make is
-- Create a lexical analyser for Eiffel if none,
-- then use it to analyze the file of name
-- file_name.
local
file_name: STRING
do
if argument_count < 1 then
io.error.putstring ("Usage: eiffel_scan eiffel_class_file.e%N")
else
file_name := argument (1)
scanning_make
build ("eiffel_lex", "eiffel_regular")
io.putstring ("Scanning file `")
io.putstring (file_name)
io.putstring ("'.%N")
analyze (file_name)
end
end
make
-- Create a lexical analyser for Eiffel if none,
-- then use it to analyze the file of name
-- file_name.
local
file_name: STRING
do
if argument_count < 1 then
io.error.putstring ("Usage: eiffel_scan eiffel_class_file.e%N")
else
file_name := argument (1)
scanning_make
build ("eiffel_lex", "eiffel_regular")
io.putstring ("Scanning file `")
io.putstring (file_name)
io.putstring ("'.%N")
analyze (file_name)
end
end
end -- class EIFFEL_SCAN
end -- class EIFFEL_SCAN
</code>
</code>