Commit c4f1fc71 authored by Martin Wierich's avatar Martin Wierich
Browse files

enable compiler to create "Clean System Files" folder

parent 6d9f1414
// this is for the PowerMac
definition module CoclSystemDependent
//1.3
from StdString import String
//3.1
from StdFile import Files
PathSeparator
......@@ -13,3 +16,5 @@ script_handler :: !{#Char} *Files -> (!Int,!*Files);
clean2_compile :: !Int -> Int;
clean2_compile_c_entry :: !Int -> Int;
ensureCleanSystemFilesExists :: !String !*Files -> (!Bool, !*Files)
......@@ -105,3 +105,7 @@ cast :: !*a -> *b;
cast f = code {
pop_b 0
}
ensureCleanSystemFilesExists :: !String !*Files -> (!Bool, !*Files)
ensureCleanSystemFilesExists _ files = (True, files)
// because of dcl file caching the Clean System Files folder should exist always
\ No newline at end of file
// this is for Windows
definition module CoclSystemDependent
//1.3
from StdString import String
//3.1
from StdFile import Files
// RWS split
// from deltaIOSystem import DeviceSystem
// from deltaEventIO import InitialIO, IOState
......@@ -12,3 +17,5 @@ DirectorySeparator
SystemDependentDevices :: [a]
SystemDependentInitialIO :: [a]
ensureCleanSystemFilesExists :: !String !*Files -> (!Bool, !*Files)
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment