diff options
| author | johnvg | 2012-09-21 10:15:06 +0000 |
|---|---|---|
| committer | johnvg | 2012-09-21 10:15:06 +0000 |
| commit | 0ec7d51b8f08d1b5302d56270d144907b95bcbc9 (patch) | |
| tree | 9444a33eb31b08eb9421b9ef908e382d21dd5d8e /frontend/scanner.dcl | |
| parent | don't try to remove file extension in BEGenerateCode, (diff) | |
add hierarchical modules
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@2177 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/scanner.dcl')
| -rw-r--r-- | frontend/scanner.dcl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/frontend/scanner.dcl b/frontend/scanner.dcl index 1a5b8da..24e66c0 100644 --- a/frontend/scanner.dcl +++ b/frontend/scanner.dcl @@ -120,6 +120,7 @@ instance <<< FilePosition | FunctionContext | CodeContext | GenericContext + | ModuleNameContext :: Assoc = LeftAssoc | RightAssoc | NoAssoc @@ -147,7 +148,7 @@ instance replaceToken ScanState class getPosition state :: !*state -> (!FilePosition,!*state) // Position of current Token (or Char) instance getPosition ScanState -openScanner :: !String !SearchPaths (ModTimeFunction *Files) !*Files -> (!Optional (ScanState, {#Char}), !*Files) // state, file time +openScanner :: !String !String !SearchPaths (ModTimeFunction *Files) !*Files -> (!Optional (ScanState, {#Char}), !*Files) // state, file time closeScanner :: !ScanState !*Files -> *Files setUseLayout :: !Bool !ScanState -> ScanState |