links · people · groups · tags | My: links · tags · groups · watchlists · notes login · sign up now! | help · blog
Simpy simpy
 
Michael Shook, member since May 27, 2004
.
Search Everyone: "16",
1 - 3 of 3   Watch mshook
 
Those of us who tend the land
set about to planting
The rest do what we can
  • I may have the LP in the garage somewhere but we don't have a turntable set up.
  • Google finds nothing:
  • http://www.google.com/#q="those+of+us+who+tend+the+land"
  • http://www.google.com/#q="set about to planting"
  • http://www.google.com/#q="the rest do what we can"
by mshook 2009-07-16 08:37 16 · july · 2009 · a · lyrics · song · folk · music · wishlist
http://mshook.appspot.com/z/d4m.htm?/mshook/16+july+2009+a - cached - mail it - history
(define (eval exp env)
  (cond ((self-evaluating? exp) exp)
        ((variable? exp) (lookup-variable-value exp env))
        ((quoted? exp) (text-of-quotation exp))
        ((assignment? exp) (eval-assignment exp env))
        ((definition? exp) (eval-definition exp env))
        ((if? exp) (eval-if exp env))
        ((lambda? exp)
         (make-procedure (lambda-parameters exp)
                         (lambda-body exp)
                         env))
        ((begin? exp) 
         (eval-sequence (begin-actions exp) env))
        ((cond? exp) (eval (cond->if exp) env))
        ((application? exp)
         (apply (eval (operator exp) env)
                (list-of-values (operands exp) env)))
        (else
         (error "Unknown expression type -- EVAL" exp))))
  • http://mitpress.mit.edu/sicp/full-text/book/book-Z-H-26.html
by mshook 2009-05-16 17:56 sicp · eval · lisp · scheme · code · 16 · may · 2009 · b
http://mshook.googlepages.com/d4m.htm?/mshook/16+may+2009+b - cached - mail it - history
We want to write a function that generates accumulators-- a function that takes a number n, and returns a function that takes another number i and returns n incremented by i.

JavaScript

function foo(n) { return function (i) { return n += i } }

Scheme

(define (foo n) (lambda (i) (set! n (+ n i)) n))

Try

JavaScript

function main() { function foo (n) { return function (i) { return n += i } } ; a = foo(5); print(a(1)); print("n"); print(a(4)); }

Scheme

(define (foo n) (lambda (i) (set! n (+ n i)) n)) (define a (foo 5)) (a 1) (a 4)
by mshook 2009-05-16 14:30 lisp · scheme · javascript · 16 · may · 2009 · a · example · code · theory · comparison · good · closure
http://mshook.googlepages.com/d4m.htm?/mshook/16+may+2009+a - cached - mail it - history
1 - 3 of 3  
Related Tags
 
- exclude ~ optional + require
Add Dates