kahana@anaxagoras.ils.nwu.edu (Jason Kahana) (02/19/91)
I ame currently using Brandeis' Gambit interpreter, but I have noticed that it does not include the atom? function. When I try to evaluate: : (atom? (car (cons 1 2))) I get a *** ERROR, Unbound variable: atom? Any suggestions or hacks? Jason Kahana ########################################################################### # Predetermined destiny is who I am. # Jason Adam Kahana # # You've got your finger # kahana@ils.nwu.edu # # On the trigger # Northwestern University # # Like the Son of Sam. # Academic Computing and Networking # # -B.B # Services # ########################################################################### -- Predetermined destiny is who I am | Jason Adam Kahana You got your finger | kahana@ils.nwu.edu, kahana@acns.nwu.edu On the trigger | Northwestern University Like the Son of Sam. -B.B. | Academic Computing and Networking Services
hardy@golem.ps.uci.edu (Meinhard E. Mayer (Hardy)) (02/19/91)
In article <903@anaxagoras.ils.nwu.edu> kahana@anaxagoras.ils.nwu.edu (Jason Kahana) writes: > I am currently using Brandeis' Gambit interpreter, but I have noticed that > it does not include the atom? function. > > When I try to evaluate: > : (atom? (car (cons 1 2))) > > I get a *** ERROR, Unbound variable: atom? > > Any suggestions or hacks? Standard scheme does not contain atom? You can add it by including in your init.scm (or whatever init file is loaded by gsi) the line (define (atom? x) (not (pair? x))) or the version from ``The Little Lisper'' (define atom? (let ((f1 pair?) (f2 not)) (lambda (x) (f2 (f1 x))))) And PLEASE cut down the iteration in your .signature Hardy Mayer ----****---- Professor Meinhard E. Mayer Department of Physics University of California Irvine, CA, 92717 USA