diff options
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 |