| … | … | ||
|---|---|---|---|
| 714 | (not (cond-eval (cadr condition))))) | 714 | (not (cond-eval (cadr condition))))) |
| 715 | (else (error "cond-expand : unknown operator" (car condition))))))) | 715 | (else (error "cond-expand : unknown operator" (car condition))))))) |
| 716 | 716 | ||
| 717 | (gc-verbose #f) | 717 | (gc-verbose #f) |
| 718 | 718 | ||
| 719 | (do ((j 0 (+ j 1))) ((> j 100000)) ()) | 719 | (load "cc.scm") |
| 720 | |||
| 721 | (quit) |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |