Fixed arity and formatting problems.

diff --git a/v8/src/runtime/coerce.scm b/v8/src/runtime/coerce.scm
index adbfb0787f42a07eb76f60ea642c1b62be3e0cd7..f17889e164edddf6bef8a733d2460d3c388ca10a 100644 (file)
--- a/v8/src/runtime/coerce.scm
+++ b/v8/src/runtime/coerce.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: coerce.scm,v 1.7 1996/07/30 16:26:51 adams Exp $
+$Id: coerce.scm,v 1.8 1996/07/30 16:54:58 adams Exp $
 
 Copyright (c) 1996 Massachusetts Institute of Technology
 
@@ -197,11 +197,10 @@ MIT in each case. |#
 
 (define (%compiled-code-support:nonrestartable-continuation result)
   (error
-   "You attempted to return to a subproblem with a non-restartable error in"
-   (error-irritant/noise "compiled code, using the value: \n;  ")
+   "You attempted to return to a subproblem with a non-restartable error in compiled code, using the value: ")
    result))
 
-(define (%compiled-code-support:signal-error-in-primitive prim args)
+(define (%compiled-code-support:signal-error-in-primitive prim . args)
   (apply prim args))
 \f
 ;; This is defined in make.scm: