diff options
| author | Eugen Wissner <belka@caraus.de> | 2026-07-07 21:39:57 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2026-07-07 21:39:57 +0200 |
| commit | 79521d91b2bb85652fd29f5c44279338d55c757f (patch) | |
| tree | d3b5b73177f63fd5ff684a8aba6f7b9af84dab27 /source/lexer.elna | |
| parent | 470bfba45661d19558c0bf43b7819696a925ecb4 (diff) | |
| download | elna-79521d91b2bb85652fd29f5c44279338d55c757f.tar.gz | |
Allow multiple parameters with same type
Diffstat (limited to 'source/lexer.elna')
| -rw-r--r-- | source/lexer.elna | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/source/lexer.elna b/source/lexer.elna index b3250d0..9008139 100644 --- a/source/lexer.elna +++ b/source/lexer.elna @@ -67,7 +67,7 @@ type start_location: TextLocation; end_location: TextLocation end - TransitionAction = proc(^Lexer, ^LexerToken) + TransitionAction = proc(lexer: ^Lexer; token: ^LexerToken) Transition = record action: TransitionAction; next_state: TransitionState @@ -298,7 +298,7 @@ begin end end -proc compare_keyword(keyword: String; token_start: BufferPosition; token_end: ^Char) -> Bool +proc compare_keyword(keyword: String; token_start: BufferPosition; token_end: ^Char): Bool var result: Bool index: Word @@ -585,7 +585,7 @@ begin token^.value.integerKind := atoi(@token^.value.identifierKind[2]) end -proc set_default_transition(current_state: TransitionState; default_action: TransitionAction; next_state: TransitionState) -> Int +proc set_default_transition(current_state: TransitionState; default_action: TransitionAction; next_state: TransitionState): Int var default_transition: Transition state_index: Int @@ -889,7 +889,7 @@ begin end (* Returns the last read token. *) -proc lexer_current*(lexer: ^Lexer) -> LexerToken +proc lexer_current*(lexer: ^Lexer): LexerToken var current_class: TransitionClass current_state: TransitionState @@ -921,7 +921,7 @@ begin end (* Read and return the next token. *) -proc lexer_lex*(lexer: ^Lexer) -> LexerToken +proc lexer_lex*(lexer: ^Lexer): LexerToken var result: LexerToken begin |
