learning-sicp

My embarrassing half assed SICP run.
Log | Files | Refs

set-rear-ptr.scm (182B)


      1 (define-library (sicp solutions 3_23 set-rear-ptr)
      2   (import (scheme base))
      3 
      4   (export set-rear-ptr!)
      5 
      6   (begin
      7     (define (set-rear-ptr! deque item)
      8       (set-cdr! deque item))))