~ chicken-core (chicken-5) 6d3f83e5ced31e98a51f9009aeea2bb117f176bf


commit 6d3f83e5ced31e98a51f9009aeea2bb117f176bf
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Fri Oct 20 07:17:17 2017 +1300
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Fri Oct 20 10:58:28 2017 +1300

    Fix incorrect types.db entry for `load-noisily`
    
    The `load-noisily` procedure takes keyword arguments, so its optional
    arguments should be indicated by "#!rest" rather than positional values.

diff --git a/types.db b/types.db
index 361a723f..aff01fc7 100644
--- a/types.db
+++ b/types.db
@@ -1276,7 +1276,7 @@
  (#(procedure #:clean) chicken.load#dynamic-load-libraries (#!optional (list-of string)) (list-of string)))
 (chicken.load#load (procedure chicken.load#load (string #!optional (procedure (*) . *)) undefined))
 (chicken.load#load-library (#(procedure #:enforce) chicken.load#load-library (symbol #!optional string) undefined))
-(chicken.load#load-noisily (procedure chicken.load#load-noisily (string #!optional (procedure (*) . *) boolean (procedure (*) . *)) undefined))
+(chicken.load#load-noisily (procedure chicken.load#load-noisily (string #!rest) undefined))
 (chicken.load#load-relative (#(procedure #:enforce) chicken.load#load-relative (string #!optional (procedure (*) . *)) undefined))
 (chicken.load#load-verbose (#(procedure #:clean) chicken.load#load-verbose (#!optional *) *))
 (chicken.load#provide (#(procedure #:clean #:enforce) chicken.load#provide (#!rest symbol) undefined))
Trap