Changeset 12122 in project
- Timestamp:
- 10/08/08 12:38:00 (12 years ago)
- Location:
- chicken/trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
chicken/trunk/TODO
r12105 r12122 1 1 TODO for trunk -*- Outline -*- 2 2 3 3 4 * expander … … 42 43 *** would inline in other compilation units, but not in current (sort of confusing) 43 44 ** remove "custom-declare" + stuff? 45 ** "assume-no-redefinitions" mode? 46 like Gambit's block-mode (?): single toplevel assignment makes assigned 47 variable known (and allows inlining/contraction) 48 ** when inlining, consing arg-list with "list" may make get-keyword possible foldable 44 49 45 50 * tests -
chicken/trunk/csi.scm
r12085 r12122 104 104 (define (print-banner) 105 105 (newline) 106 (when (and (tty-input?) (##sys#fudge 11))106 #;(when (and (tty-input?) (##sys#fudge 11)) 107 107 (let* ((t (string-copy +product+)) 108 108 (len (string-length t))
Note: See TracChangeset
for help on using the changeset viewer.