Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

First-class (run-time) macros

Name: Anonymous 2012-11-10 9:22

http://matt.might.net/articles/metacircular-evaluation-and-first-class-run-time-macros/
Discuss.

Name: Anonymous 2012-11-10 10:05

1
Symta:

/-\|_|_/-\|-|

Scheme:

(define gensym (lambda params

                 (if (null? params)

                     (begin

                       (set! gensym-count (+ gensym-count 1))

                       (string->symbol (string-append

                                        "$"

                                        (number->string gensym-count))))

                     (begin

                       (set! gensym-count (+ gensym-count 1))

                       (string->symbol (string-append 

                                        (car params)

                                        "$"

                                        (number->string gensym-count)))))))

Newer Posts

First-class (run-time) macros

1 Name: Anonymous 2012-11-10 9:22

2 Name: Anonymous 2012-11-10 10:05

Name: Anonymous 2012-11-10 9:22

Name: Anonymous 2012-11-10 10:05