Compiler/lexical analyzer: Difference between revisions

Content added Content deleted
(Add Common Lisp implementation)
m (minor edits)
Line 1,829: Line 1,829:
do (format t "~5D ~5D ~15A~@[ ~S~]~%"
do (format t "~5D ~5D ~15A~@[ ~S~]~%"
(token-line token) (token-column token) (token-name token) (token-value token))
(token-line token) (token-column token) (token-name token) (token-value token))
finally (format t "~5D ~5D ~14A~%"
finally (format t "~5D ~5D ~15A~%"
(line-of stream) (column-of stream) '|End_of_input|)
(line-of stream) (column-of stream) '|End_of_input|)
(close stream))))
(close stream))))
Line 1,881: Line 1,881:
21 26 Integer 92
21 26 Integer 92
22 26 Integer 32
22 26 Integer 32
23 1 End_of_input </pre>
23 1 End_of_input </pre>


=={{header|Euphoria}}==
=={{header|Euphoria}}==