~ chicken-core (chicken-5) bb29d049813112d08e2ae4d739a874fd09527b5c


commit bb29d049813112d08e2ae4d739a874fd09527b5c
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Jun 23 20:40:21 2011 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Jun 23 20:40:21 2011 +0200

    added suggestive note to types.db

diff --git a/types.db b/types.db
index e39749e0..5041696e 100644
--- a/types.db
+++ b/types.db
@@ -158,6 +158,10 @@
      ((float float) (##core#inline "C_i_flonum_min" #(1) #(2))))
 
 (+ (procedure! + (#!rest number) number)
+;XXX add these, also for other multi-arity, possibly fast operations:
+;
+;   ((* * * *) (+ (+ (+ #(1) #(2)) #(3)) #(4)))
+;   ((* * *) (+ (+ #(1) #(2)) #(3)))
    ((fixnum) (fixnum) #(1))
    ((float) (float) #(1))
    ((number) #(1))
Trap