const EOF = 0;
deferred int line;
tom.OutputStream describeLocation tom.OutputStream s for Parser parser;
s
. The default implementation prints the line. The parser
may be
nil
, if there is no current parser.
static tom.MutableIndexed path;
static public Parser current_parser;
int global_num_errors;
int global_num_warnings;
tom.MutableArray tokens_by_number;
public boolean trace_default;
tom.OutputStream (s) help tom.OutputStream s done tom.MutableKeyed done;
tom.ByteString
unit arguments.
void load tom.MutableArray arguments;
:trace-parser
arguments.
void set_trace_default boolean value;
deferred void fill_tokens_by_number;
void addToPath tom.String directory;
directory
to the search path
.
tom.Indexed path;
path
.
tom.OutputStream errorStream;
err
.
int num_errors;
global_num_errors
. (The variable isn't public to share
a few selectors.)
int num_warnings;
global_num_warnings
.
tom.OutputStream error;
current_parser
.
tom.OutputStream error FileElement object;
object
,
similar to error
.
tom.OutputStream report;
current_parser
.
tom.OutputStream report FileElement object;
object
,
similar to an error
but without counting it as one.
tom.OutputStream warning;
current_parser
.
tom.OutputStream warning FileElement object;
object
,
similar to warning
.
public Lexer lex;
int token;
public int num_errors;
public int num_warnings;
public boolean trace;
tom.OutputStream describe tom.OutputStream s token int token;
token
on the output stream s
.
tom.OutputStream describe tom.OutputStream s tokens tom.Enumerator e;
e
on the output stream s
.
tom.OutputStream errorStream;
err
.
tom.OutputStream error;
tom.OutputStream error FileElement object;
object
,
similar to error
.
tom.OutputStream report;
tom.OutputStream report FileElement object;
object
,
similar to error
, but without counting it as one.
tom.OutputStream warning;
tom.OutputStream warning FileElement object;
object
,
similar to warning
.
tom.OutputStream syntaxError;
void fatalError;
id init Lexer l;
int nextToken;
void set_trace boolean value;
void term int expected;
tom.Array tokens_by_number;