diff options
| author | pieter | 2001-10-04 07:26:09 +0000 |
|---|---|---|
| committer | pieter | 2001-10-04 07:26:09 +0000 |
| commit | d8eeac8d26fbaad5a3e3edcbbd927d25506887d7 (patch) | |
| tree | 93a4d7511b6ec746dcc37025244ae6643a8c5853 /frontend/scanner.dcl | |
| parent | Bug fixes: overloading error, changed the order of dictionaries (diff) | |
Context -> ScanContext
various small things like operators of the form ::>
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@822 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/scanner.dcl')
| -rw-r--r-- | frontend/scanner.dcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/frontend/scanner.dcl b/frontend/scanner.dcl index b20e43f..47038ad 100644 --- a/frontend/scanner.dcl +++ b/frontend/scanner.dcl @@ -113,7 +113,7 @@ instance <<< FilePosition | ExistsToken // E. | ForAllToken // A. -:: Context +:: ScanContext = GeneralContext | TypeContext | FunctionContext @@ -129,13 +129,13 @@ instance getFilename ScanState class tokenBack state :: !*state -> !*state instance tokenBack ScanState -class nextToken state :: !Context !*state -> (!Token, !*state) +class nextToken state :: !ScanContext !*state -> (!Token, !*state) instance nextToken ScanState class currentToken state :: !*state -> (!Token, !*state) instance currentToken ScanState -class insertToken state :: !Token !Context !*state -> *state +class insertToken state :: !Token !ScanContext !*state -> *state instance insertToken ScanState class replaceToken state :: !Token !*state -> *state |