~ chicken-core (chicken-5) 1f5ac17f7ac5ea2149960c35153c94d94f5a4a74
commit 1f5ac17f7ac5ea2149960c35153c94d94f5a4a74 Author: felix <felix@call-with-current-continuation.org> AuthorDate: Tue May 10 08:31:24 2011 +0200 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Tue May 10 08:31:24 2011 +0200 missing parens reported by kon diff --git a/scrutinizer.scm b/scrutinizer.scm index 18bcb775..31e5d87e 100755 --- a/scrutinizer.scm +++ b/scrutinizer.scm @@ -111,7 +111,7 @@ ((list? lit) 'list) ((eof-object? lit) 'eof) ((vector? lit) 'vector) - ((and (not (##sys#immediate? lit)) ##sys#generic-structure? lit) + ((and (not (##sys#immediate? lit)) (##sys#generic-structure? lit)) `(struct ,(##sys#slot lit 0))) ((char? lit) 'char) (else '*)))Trap