~ chicken-core (chicken-5) f9f768d6acfb84fa535ac668e0d59434d9dc1dc8
commit f9f768d6acfb84fa535ac668e0d59434d9dc1dc8 Author: felix <felix@z.(none)> AuthorDate: Tue Mar 29 10:35:14 2011 +0200 Commit: felix <felix@z.(none)> CommitDate: Tue Mar 29 10:35:14 2011 +0200 syntax fix diff --git a/scrutinizer.scm b/scrutinizer.scm index 0ec91a9a..a7d3befd 100755 --- a/scrutinizer.scm +++ b/scrutinizer.scm @@ -134,7 +134,7 @@ => (o list cdr)) ((and (get db id 'assigned) (not (##sys#get id '##core#declared-type))) - '(*) + '(*)) ((assq id e) => (lambda (a) (cond ((eq? 'undefined (cdr a))Trap