diff options
author | johnvg | 2012-10-08 12:37:41 +0000 |
---|---|---|
committer | johnvg | 2012-10-08 12:37:41 +0000 |
commit | 73470625e3651f773b0c4cdbe7db714fc3491804 (patch) | |
tree | 5e69eb572290b36288278f66f856cf00a410ad0e /frontend/scanner.dcl | |
parent | add tsvn:logminsize 1 property (diff) |
search and open file before calling wantModule
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@2184 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/scanner.dcl')
-rw-r--r-- | frontend/scanner.dcl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/frontend/scanner.dcl b/frontend/scanner.dcl index 24e66c0..3667d05 100644 --- a/frontend/scanner.dcl +++ b/frontend/scanner.dcl @@ -148,7 +148,9 @@ instance replaceToken ScanState class getPosition state :: !*state -> (!FilePosition,!*state) // Position of current Token (or Char) instance getPosition ScanState -openScanner :: !String !String !SearchPaths (ModTimeFunction *Files) !*Files -> (!Optional (ScanState, {#Char}), !*Files) // state, file time +fopenInSearchPaths :: !{#Char} !{#Char} !SearchPaths !Int (ModTimeFunction *Files) !*Files -> (Optional (*File, {#Char}, {#Char}),!*Files) + +openScanner :: !*File !String !String -> ScanState closeScanner :: !ScanState !*Files -> *Files setUseLayout :: !Bool !ScanState -> ScanState |