From a7198b425b69eddcc0ad553c41a315d198054316 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Tue, 3 May 2016 04:18:12 -0400 Subject: [PATCH] Removed dead code --- cyclone.scm | 18 ------------------ 1 file changed, 18 deletions(-) diff --git a/cyclone.scm b/cyclone.scm index 1962c33b..451f0fcb 100644 --- a/cyclone.scm +++ b/cyclone.scm @@ -20,24 +20,6 @@ (scheme cyclone macros) (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. ; c-compile-and-emit : (string -> A) exp -> void