Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-24 20:45:06 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Removed dead code

Browse source
This commit is contained in:
Justin Ethier 2016-05-03 04:18:12 -04:00
parent ba713abae2
commit a7198b425b
1 changed files with 0 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
cyclone.scm
View file

@ -20,24 +20,6 @@
(scheme cyclone macros) (scheme cyclone macros)
(scheme cyclone libraries)) (scheme cyclone libraries))
;;(cond-expand
;; (chicken
;; (define (Cyc-installation-dir . opt)
;; (if (equal? '(inc) opt)
;; "/home/justin/Documents/cyclone/include"
;; ;; Ignore opt and always assume current dir for chicken, since it is just dev
;; "/home/justin/Documents/cyclone"))
;; (require-extension extras) ;; pretty-print
;; (require-extension chicken-syntax) ;; when
;; (require-extension srfi-1) ;; every
;; (load (string-append (Cyc-installation-dir) "/scheme/cyclone/common.so"))
;; (load (string-append (Cyc-installation-dir) "/scheme/parser.so"))
;; (load (string-append (Cyc-installation-dir) "/scheme/cyclone/util.so"))
;; (load (string-append (Cyc-installation-dir) "/scheme/cyclone/libraries.so"))
;; (load (string-append (Cyc-installation-dir) "/scheme/cyclone/transforms.so"))
;; (load (string-append (Cyc-installation-dir) "/scheme/cyclone/cgen.so")))
;; (else #f))
;; Code emission. ;; Code emission.
; c-compile-and-emit : (string -> A) exp -> void ; c-compile-and-emit : (string -> A) exp -> void