summary refs log tree commit diff stats
path: root/rod/tccgen.nim
diff options
context:
space:
mode:
authorAraq <rumpf_a@web.de>2011-04-12 01:13:42 +0200
committerAraq <rumpf_a@web.de>2011-04-12 01:13:42 +0200
commitcd292568d775d55d9abb51e962882ecda12c03a9 (patch)
tree85451f0e1f17dc0463350915f12bdd0a82a73455 /rod/tccgen.nim
parent46c41e43690cba9bc1caff6a994bb6915df8a1b7 (diff)
downloadNim-cd292568d775d55d9abb51e962882ecda12c03a9.tar.gz
big repo cleanup
Diffstat (limited to 'rod/tccgen.nim')
-rwxr-xr-xrod/tccgen.nim76
1 files changed, 0 insertions, 76 deletions
diff --git a/rod/tccgen.nim b/rod/tccgen.nim
deleted file mode 100755
index 2fd207aaa..000000000
--- a/rod/tccgen.nim
+++ /dev/null
@@ -1,76 +0,0 @@
-#
-#
-#           The Nimrod Compiler
-#        (c) Copyright 2011 Andreas Rumpf
-#
-#    See the file "copying.txt", included in this
-#    distribution, for details about the copyright.
-#
-
-import
-  os, strutils, options, msgs, tinyc
-
-{.compile: "../tinyc/libtcc.c".}
-
-proc tinyCErrorHandler(closure: pointer, msg: cstring) {.cdecl.} = 
-  rawMessage(errGenerated, $msg)
-  
-proc initTinyCState: PccState = 
-  result = openCCState()
-  setErrorFunc(result, nil, tinyCErrorHandler)
-
-var
-  gTinyC = initTinyCState()
-  libIncluded = false
-
-proc addFile(filename: string) =  
-  if addFile(gTinyC, filename) != 0'i32:
-    rawMessage(errCannotOpenFile, filename)
-
-proc setupEnvironment = 
-  when defined(amd64):
-    defineSymbol(gTinyC, "__x86_64__", nil)
-  elif defined(i386):
-    defineSymbol(gTinyC, "__i386__", nil)  
-  when defined(linux):
-    defineSymbol(gTinyC, "__linux__", nil)
-    defineSymbol(gTinyC, "__linux", nil)
-  var nimrodDir = getPrefixDir()
-
-  addIncludePath(gTinyC, libpath)
-  when defined(windows): 
-    addSysincludePath(gTinyC, nimrodDir / "tinyc/win32/include")
-  addSysincludePath(gTinyC, nimrodDir / "tinyc/include")
-  when defined(windows): 
-    defineSymbol(gTinyC, "_WIN32", nil)
-    # we need Mingw's headers too:
-    var gccbin = getConfigVar("gcc.path") % ["nimrod", nimrodDir]
-    addSysincludePath(gTinyC, gccbin /../ "include")
-    #addFile(nimrodDir / r"tinyc\win32\wincrt1.o")
-    addFile(nimrodDir / r"tinyc\win32\alloca86.o")
-    addFile(nimrodDir / r"tinyc\win32\chkstk.o")
-    #addFile(nimrodDir / r"tinyc\win32\crt1.o")
-
-    #addFile(nimrodDir / r"tinyc\win32\dllcrt1.o")
-    #addFile(nimrodDir / r"tinyc\win32\dllmain.o")
-    addFile(nimrodDir / r"tinyc\win32\libtcc1.o")
-    
-    #addFile(nimrodDir / r"tinyc\win32\lib\crt1.c")
-    #addFile(nimrodDir / r"tinyc\lib\libtcc1.c")
-  else:
-    addSysincludePath(gTinyC, "/usr/include")
-
-proc compileCCode*(ccode: string) = 
-  if not libIncluded:
-    libIncluded = true
-    setupEnvironment()
-  discard compileString(gTinyC, ccode)
-  
-proc run*() = 
-  var a: array[0..1, cstring]
-  a[0] = ""
-  a[1] = ""
-  var err = tinyc.run(gTinyC, 0'i32, addr(a)) != 0'i32
-  closeCCState(gTinyC)
-  if err: rawMessage(errExecutionOfProgramFailed, "")  
-