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