Skip to content

Instantly share code, notes, and snippets.

@manishym
Created December 17, 2011 03:46
Show Gist options
  • Save manishym/1489069 to your computer and use it in GitHub Desktop.
Save manishym/1489069 to your computer and use it in GitHub Desktop.
Normal order and applicative order - Scheme
(define (p) (p)) ;; P is a recursive function which does not end.
(defun (text x y))
(if (= x 0)
0
y))
(test 0 (p))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment