Add A command line parsing procedure

This commit is contained in:
2025-05-31 11:27:23 +02:00
parent a93d12eb50
commit 092bc06f6b
10 changed files with 122 additions and 0 deletions

View File

@ -421,6 +421,14 @@ BEGIN
WriteString('NIL ');
written_bytes := 1
END;
IF (token.kind = lexerKindBoolean) AND token.booleanKind THEN
WriteString('TRUE ');
written_bytes := 1
END;
IF (token.kind = lexerKindBoolean) AND (~token.booleanKind) THEN
WriteString('FALSE ');
written_bytes := 1
END;
IF token.kind = lexerKindOr THEN
WriteString('OR ');
written_bytes := 1