setup-ecl.lisp 368 Bytes
Newer Older
Eric Marsden's avatar
Eric Marsden committed
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
;;; setup file for cl-bench running in ECL
;;
;; tested with ECL 0.9
;;
;; see <URL:http://ecls.sf.net/>

(load "defpackage")
(in-package :cl-bench)


(defun bench-gc ()
  (si:gc t))

(defmacro with-spawned-thread (&body body)
  `(progn ,@body))


;; to autoload the compiler
(compile 'bench-gc)
(setq c::*cc-flags* (concatenate 'string "-I. " c::*cc-flags*))

;; EOF