learning-sicp

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

exercise-34.scm (446B)

      1 (define-library (sicp solutions chapter-1 exercise-34)
      2   (import (scheme base))
      3 
      4   (begin
      5     (define (f g)
      6       (g 2))
      7 
      8     '(f f)
      9 
     10     '((lambda (f g) (g 2))
     11      (lambda (f g) (g 2)))
     12 
     13     '((lambda (f g) (g 2)) 2)
     14 
     15     '(2 2)
     16 
     17     '2-is-not-a-procedure
     18 
     19     '(f f)
     20 
     21     "Outout in Geiser's C-x C-e *Geiser Debug* buffer:
     22 ```
     23 (f f)
     24 
     25 ice-9/boot-9.scm:1685:16: In procedure raise-exception:
     26 Wrong type to apply: 2
     27 
     28 
     29 [Debugging level: 2]
     30 ```"))