X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?a=blobdiff_plain;f=README.md;h=0a861b9d609e10a1788bade63c844325063c5a08;hb=6a5e70c39ecda241347d0b8881fda4aea31dd3cf;hp=974db98a0f60169dbd45946bdbf0e72c0dfb6e1a;hpb=a39894e12a9e84a17411e3bdd5d49fae3369e0d4;p=scheme.forth.jl.git diff --git a/README.md b/README.md index 974db98..0a861b9 100644 --- a/README.md +++ b/README.md @@ -9,7 +9,7 @@ Scheme](https://github.com/petermichaux/bootstrap-scheme) (as described in [this wonderful series of blog posts](http://peter.michaux.ca/articles/scheme-from-scratch-introduction)) from C to forth, but also includes variadic compound function support, mark-sweep -garbage collection, quasiquotation, and a very basic (non-hygenic) macro +garbage collection, quasiquotation, and a basic (non-hygienic) macro system. In future, I plan to also implement a more complete numerical tower to bring it closer to @@ -53,6 +53,55 @@ At this point you can start entering Scheme commands. For example, > (factorial 5) ; 120 +Metacircular Evaluator +====================== + +Of course, one of the things you can do in Scheme (or of course any programming +language, this is the fundamental thing) is implement an interpreter for +another programming language. The examples directory in this repository +contains a verbatim copy of the source for the "metacircular" scheme interpreter +from SICP. To load it, use the following command: + + > (load "../examples/metacirc.scm") + ; ok + +Be prepared to wait a couple of minutes. When the interpreter finally loads, enter +the following command to run it: + + > (driver-loop) + +You'll then be greeted by the following prompt: + + ;; M-Eval input: + +At this point you can start entering Scheme commands... but be prepared to wait +a while for the result. After all, when evaluating commands in the MCE you are +running a program in a Scheme interpreter running inside another Scheme +interpreter which is itself running on a Forth system that is implemented atop +the Julia numerical computing environment. **That's three levels of +abstraction more than a native Julia program experiences**, so some delay is to +be expected! + +For instance, the following example from SICP defines and demonstrates a +recursive list append procedure: + + (define (append x y) + (if (null? x) + y + (cons (car x) + (append (cdr x) y)))) + + ;;; M-Eval value: + ok + + ;;; M-Eval input: + (append '(a b c) '(d e f)) + + ;;; M-Eval value: + (a b c d e f) + +You may have to wait a minute or so for the final result to be printed. + License =======