~ chicken-core (chicken-5) a7df13bd78fe9da4dcdf27286d3a57b58f44998a
commit a7df13bd78fe9da4dcdf27286d3a57b58f44998a
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Tue May 10 08:29:01 2011 +0200
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Tue May 10 08:29:01 2011 +0200
missing parens reported by kon
diff --git a/scrutinizer.scm b/scrutinizer.scm
index 5763099b..99f6840c 100755
--- a/scrutinizer.scm
+++ b/scrutinizer.scm
@@ -75,7 +75,7 @@
((pair? lit) 'pair)
((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)))
((null? lit) 'null)
((char? lit) 'char)
Trap