diff options
author | johnvg | 2001-11-21 14:48:35 +0000 |
---|---|---|
committer | johnvg | 2001-11-21 14:48:35 +0000 |
commit | 27f4faa94e9f24d7f6edb1c489c0e0a423b3ea9a (patch) | |
tree | 1664cf026fad2db55f22d2d96fcef41f906b70d7 /main | |
parent | tail recursion modulo cons for strict lists (diff) |
new explicit import syntax
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@901 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'main')
-rw-r--r-- | main/Windows/CoclSystemDependent.dcl | 5 | ||||
-rw-r--r-- | main/compile.dcl | 6 | ||||
-rw-r--r-- | main/filesystem.dcl | 5 |
3 files changed, 14 insertions, 2 deletions
diff --git a/main/Windows/CoclSystemDependent.dcl b/main/Windows/CoclSystemDependent.dcl index 10d2d1a..bdcddb1 100644 --- a/main/Windows/CoclSystemDependent.dcl +++ b/main/Windows/CoclSystemDependent.dcl @@ -3,8 +3,11 @@ definition module CoclSystemDependent //1.3 from StdString import String -//3.1 from StdFile import Files +//3.1 +/*2.0 +from StdFile import ::Files +0.2*/ // RWS split // from deltaIOSystem import DeviceSystem diff --git a/main/compile.dcl b/main/compile.dcl index a26b3a9..83ffb37 100644 --- a/main/compile.dcl +++ b/main/compile.dcl @@ -3,7 +3,12 @@ */ definition module compile +/*2.0 +from StdFile import ::Files +0.2*/ +//1.3 from StdFile import Files +//3.1 import checksupport compile :: ![{#Char}] !*DclCache !*Files -> (!Bool,!*DclCache,!*Files) @@ -17,4 +22,3 @@ compile :: ![{#Char}] !*DclCache !*Files -> (!Bool,!*DclCache,!*Files) }; empty_cache :: *SymbolTable -> *DclCache - diff --git a/main/filesystem.dcl b/main/filesystem.dcl index 5100e70..3b29e8a 100644 --- a/main/filesystem.dcl +++ b/main/filesystem.dcl @@ -7,7 +7,12 @@ */ definition module filesystem +/*2.0 +from StdFile import class FileSystem,::Files +0.2*/ +//1.3 from StdFile import FileSystem, Files +//3.1 // return last modified time (local time) as "yyyymmddhhmmss" or "" on error fmodificationtime :: {#Char} !*env -> (!{#Char}, !*env) | FileSystem env |