~ chicken-core (chicken-5) a032b09ad95f658fa55a438b7e0dd8a3c58763aa
commit a032b09ad95f658fa55a438b7e0dd8a3c58763aa Author: felix <felix@call-with-current-continuation.org> AuthorDate: Thu Aug 19 03:08:13 2010 -0400 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Thu Aug 19 03:08:13 2010 -0400 types.db fix by Kon Lovett diff --git a/types.db b/types.db index 721590aa..f28c72a3 100644 --- a/types.db +++ b/types.db @@ -636,7 +636,7 @@ (set-procedure-data! (procedure set-procedure-data! (procedure *) undefined)) (set-unbound-variable-value! (procedure set-unbound-variable-value! (*) undefined)) (tag-pointer (procedure tag-pointer (pointer *) pointer)) -(tagged-pointer? (procedure tagged-pointer? (*) boolean)) +(tagged-pointer? (procedure tagged-pointer? (* #!optional *) boolean)) (unbound-variable-value (procedure unbound-variable-value (#!optional *) undefined)) (unbound-variable-given-value (procedure unbound-variable-given-value () *)) (unbound-variable-signals-error? (procedure unbound-variable-signals-error? () boolean))Trap