diff options
| author | johnvg | 2001-08-31 15:32:39 +0000 |
|---|---|---|
| committer | johnvg | 2001-08-31 15:32:39 +0000 |
| commit | b77678979da50af6d24529988b06ca4826b3d7ad (patch) | |
| tree | 8dfe020cb2b07376cb372fcd668c4765c626ae38 /main/compile.icl | |
| parent | add symbol_heap argument ro empty_cache (diff) | |
moved function set_compiler_id to CoclSystemDependent
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@725 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'main/compile.icl')
| -rw-r--r-- | main/compile.icl | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/main/compile.icl b/main/compile.icl index d0643b3..4906a6d 100644 --- a/main/compile.icl +++ b/main/compile.icl @@ -93,11 +93,6 @@ parseCommandLine [arg : args] options # (args,modules,options) = parseCommandLine args options = (args,[arg : modules],options); -set_compiler_id :: !Int -> Int; -set_compiler_id id = code { - ccall set_compiler_id "I:I" - }; - stripExtension :: {#Char} {#Char} -> {#Char} stripExtension extension string | stringSize >= extensionSize && (string % (stringSize-extensionSize, stringSize-1)) == extension |