Skip to content

Instantly share code, notes, and snippets.

@mocoso
Last active August 29, 2015 14:02
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mocoso/1f2bdc337f510e37dace to your computer and use it in GitHub Desktop.
Save mocoso/1f2bdc337f510e37dace to your computer and use it in GitHub Desktop.
Redefining a keyword in mit-scheme
MIT/GNU Scheme running under OS X
Type `^C' (control-C) followed by `H' to obtain information about interrupts.
Copyright (C) 2014 Massachusetts Institute of Technology
This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
Image saved on Friday May 23, 2014 at 5:50:11 PM
Release 9.2 || Microcode 15.3 || Runtime 15.7 || SF 4.41 || LIAR/C 4.118 || Edwin 3.116
1 ]=> (or (quote a) (quote b))
;Value: a
1 ]=> (define or (quote my-or))
;Value: or
1 ]=> or
;Value: my-or
1 ]=> (or (quote a) (quote b))
;The object my-or is not applicable.
;To continue, call RESTART with an option number:
; (RESTART 2) => Specify a procedure to use in its place.
; (RESTART 1) => Return to read-eval-print level 1.
2 error>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment