Commits

Moritz Heidkamp committed 240e510

Some setup file cleanup

  • Participants
  • Parent commits e3d5591

Comments (0)

Files changed (1)

 (define info
   '((version "0.0.6")))
 
-(define-for-syntax (lib-file name suffix)
-  (string-append name suffix))
-
 (define-syntax compile-lib
   (ir-macro-transformer
    (lambda (x i c)
      (let ((name (symbol->string (strip-syntax (last x)))))
        `(begin
-          (compile -d0 -O3 -J -s ,@(butlast (cdr x)) ,(lib-file name ".scm"))
-          (compile -d0 -O3 -s ,(lib-file name ".import.scm")))))))
+          (compile -d0 -O3 -J -s ,@(butlast (cdr x)) ,(string-append name ".scm"))
+          (compile -d0 -O3 -s ,(string-append name ".import.scm")))))))
 
 (compile-lib -X char-set-literals lowdown-lolevel)
 (compile-lib lowdown)
 (install-extension
  'lowdown
  '("lowdown-lolevel.so" "lowdown-lolevel.import.so"
-   "lowdown.so" "lowdown.import.so")
- info)
-
-(install-extension
- 'lowdown
- '("lowdown-extra.so" "lowdown-extra.import.so")
+   "lowdown.so" "lowdown.import.so"
+   "lowdown-extra.so" "lowdown-extra.import.so")
  info)