Update documentation, remove old bug files, move bugs into bugs/.
[mes.git] / bugs / c2.mes
1 ;; guile
2 #!
3 ;;; compiling /home/janneke/src/mes/c2.mes
4 joepie-complie
5 ;;; compiled /home/janneke/.cache/guile/ccache/2.2-LE-8-3.7/home/janneke/src/mes/c2.mes.go
6 joepie
7 jippie
8 !#
9
10 ;;mes
11
12
13 (define-macro (bla naam de-lambda)
14   `(define-macro (,naam . rest)
15      (,de-lambda)))
16
17 (bla joepie
18      (let ()
19         (lambda ()
20           (list 'begin
21                 (list 'display "joepie")
22                 (list 'newline)
23                 (and
24                  (display "joepie-complie")
25                  (newline)
26                  "jippie")))))
27
28 (display "compiled")
29 (newline)
30 (display (joepie 'x))
31 (newline)
32