Sketchy LISP
Volume 2 - Reference
  Copyright (C) 2006
Nils M Holm

Buy a printed copy

A Condensed Introduction to Functional Programming in Scheme

8 Meta Commands

8.1 Entering Meta Commands

A meta command is entered by typing a colon (:) followed by the command itself on an empty line and without any parentheses left open. Meta commands are specific to Sketchy and have no counterparts in R5RS Scheme.

8.2 :A - Arrow Mode

:a 0|1|... (default: 0)

Set arrow mode. When this option is set to 1, the => operator introduces a comment, just like ;. Arrow comments allow to enter (or paste) expressions of the form

(+ 1 2 3) => 6

without making the interpreter complain about the =>. Because this option breaks R5RS compliance, it is set to 0 by default (which makes the arrow an ordinary symbol).

Other modes, such as automatic verification, may be added in the future.

8.3 :C - Load Conditionally

:c file

Load the content of the given file in the same way as :l, but only if the Symbol file is not bound. If a path name is specified in file, only the base name will be used to look up the associated Symbol, so both of the following examples will work:

:c xyz.l
:c path/xyz.l

In both cases, a symbol named xyz will be looked up.

This command is intended for loading mutally recursive definitions.

8.4 :D - Dump Image

:d file

Dump the complete workspace of the interpreter to the given file. The image can be re-loaded by passing the name of the image file to the interpreter at startup time:

Sk image-file-name

8.5 :G - Garbage Collection

:g

Run garbage collection and print some statistics.

8.6 :K - Closure Print Level

:k 0|1|2 (default: 0)

The closure print level determines how much of a closure will print when the normal form of a reduction is a closure. By default, only the argument list of a closure will be included:

(letrec ((x 'foo))
  (lambda (y) (cons y x)))
=> #<closure (y)>

With :k 1 set, the body of the closure will be included, too, so the normal form of above expression would print as:

#<closure (y) (cons x y)>

Using the :k 2, the lexical context of the closure is included as well:

#<closure (y) (cons x y) ((x . foo) (cons . #<primitive cons>))>

Setting :k 1 or :k 0 is normally a good idea, because closures may contain self-referential structures that take infinite time to print.

8.7 :L - Load Program

:l file

Load the content of file as if typed in at the command line. Reduced expressions will not be echoed. The file name will be converted to all lower case.

If a file that is being loaded using :l contains :l meta commands itself, the files loaded by the nested meta command will be searched in the directory of the original file. Here is an example:

:l lib/foo.l

will load the file foo.l from the directory lib. All files loaded by foo.l will be opened inside of lib, so the command

:l bar.l

inside of lib/foo.l will in fact load lib/bar.l.

8.8 :Q - Quit

:q

Quit.

8.9 :S - Statistics

:s on|off (default: off)

Switch statistics mode on or off. In statistics mode, the total number of reduction steps and the number of nodes allocated during the reduction will print after each evaluation. Here is an example:

(cons 'a 'b)
=> (a . b)
6 reduction steps
25 nodes allocated

These statistics are not easy to interpret and do not provide much more than a rough basis for comparing algorithms. In the above example the six reduction steps are the following:

(cons (quote a) (quote b))
cons
(quote a)
quote
(quote b)
quote

The process allocates 25 nodes (which are roughly equivalent to atoms), because the interpreter itself allocates temporary storage during reduction.

8.10 :T - Trace Mode

:t [name]

Turn trace mode on/off. In trace mode, the interpreter will print each application of the specified function after reducing the arguments but before reducing the function Symbol. Each trace line will be prefixed with a plus sign (+). To turn off tracing, use :t without any argument.

8.11 :V - Version and License

:v[l]

Print version info. :Vl prints the conditions of use (license).

8.12 :W - Wrap Column

:w col (default: 0)

Set the wrap column for output lines to col (1..255). A col value of 0 disables wrap-around.

8.13 :Y - Dump Symbols

:y [package]

Dump the symbol table of the given package. If no package name is specified, dump the symbols of the default package. This commands also prints the names of all packages created so far. The currently open package is suffixed with the string [open].