Changeset 12122 in project

Timestamp:

10/08/08 12:38:00 (12 years ago)

Author:

felix winkelmann

Message:

silly

Location:

chicken/trunk

Files:

• TODO (modified) (2 diffs)
• csi.scm (modified) (1 diff)

chicken/trunk/TODO

@@ -1 +1 @@
 TODO for trunk                                          -*- Outline -*-
+
 
 * expander
@@ -42 +43 @@
 *** would inline in other compilation units, but not in current (sort of confusing)
 ** remove "custom-declare" + stuff?
+** "assume-no-redefinitions" mode?
+   like Gambit's block-mode (?): single toplevel assignment makes assigned
+   variable known (and allows inlining/contraction)
+** when inlining, consing arg-list with "list" may make get-keyword possible foldable
 
 * tests

chicken/trunk/csi.scm

@@ -104 +104 @@
 (define (print-banner)
   (newline)
-  (when (and (tty-input?) (##sys#fudge 11))
+  #;(when (and (tty-input?) (##sys#fudge 11))
     (let* ((t (string-copy +product+))
            (len (string-length t))