learning-sicp

My embarrassing half assed SICP run.
git clone https://kaka.farm/~git/learning-sicp
Log | Files | Refs

exercise-1.scm (207B)


      1 (define-library (sicp solutions chapter-3 exercise-1)
      2   (import (scheme base))
      3   (export make-accumulator)
      4 
      5   (begin
      6     (define (make-accumulator n)
      7       (lambda (x)
      8         (set! n (+ n x))
      9         n))))