damn tweaks19, delete *.rkt

[lambda.git] / damn.rkt

diff --git a/damn.rkt b/damn.rkt
deleted file mode 100644 (file)
index b7726af..0000000
--- a/damn.rkt
+++ /dev/null
@@ -1,14 +0,0 @@
-#lang racket
-;((lambda () (list 'John (list 'read (list 'the (list ((lambda () 'id)) 'book))))))
-
-;(define damn (lambda () 'id))
-
-(define damn (lambda () (call/cc (lambda (k) (raise (list "Something's bad" k))))))
-
-(call-with-exception-handler
- (lambda (e) (print (first e)) ((second e) 'id)) ; this is the exception handler
- (lambda ()
-   (list (list 'the (list (damn) 'man))
-         (list 'read
-               (list 'the
-                     (list (damn) 'book))))))