class SYSTEM_LEX

---

Flattened version is here

---

---

Public

Features

create(s:STR):SAME

get_str:STR

****	ignore comments and whitespace and read in a quote-delimited string. When the last string has been read, this returns void.

Iters

elt!:STR

---

Private

barf(msg:STR)

attr buf:FSTR;

****	contents of the file being parsed

attr buf:FSTR;

****	contents of the file being parsed

attr lex_state:INT;

****	0 for default, 1 for in comment, 2 for in string

attr lex_state:INT;

****	0 for default, 1 for in comment, 2 for in string

attr name:STR;

****	Name of the file

attr name:STR;

****	Name of the file

attr pos:INT;

****	current read position

attr pos:INT;

****	current read position

---