blob: e2e8817028f81ca727db38baf5687673a0739e3d (
plain)
1
2
3
4
5
6
7
8
9
|
(load-extension "integers.so")
(require (lib "defmacro.ss"))
(define-macro (throws-exception? form)
`(with-handlers ((not-break-exn? (lambda (exn) #t)))
,form
#f))
(load (build-path (path-only (path->complete-path (find-system-path 'run-file))) "../schemerunme/integers.scm"))
|
