~ chicken-core (chicken-5) 99b92da9f666d9edc4e8f127334b7808d6fd264a


commit 99b92da9f666d9edc4e8f127334b7808d6fd264a
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Mon Mar 28 10:03:50 2011 -0400
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Mon Mar 28 10:03:50 2011 -0400

    repaired incorrect conflict resolution

diff --git a/scrutinizer.scm b/scrutinizer.scm
index 70015bac..11e7699c 100755
--- a/scrutinizer.scm
+++ b/scrutinizer.scm
@@ -734,7 +734,7 @@
 				  subs 
 				  (iota len)))
 		       (fn (car args)))
-		  (let ((r (call-result args e loc (first subs) params)))
+		  (let ((r (call-result n args e loc params)))
 		    (invalidate-blist)
 		    (for-each
 		     (lambda (arg argr)
Trap