When signalling an error for primitive invocations with incorrect

numbers of arguments, omit the arity from the irritants, since we no
longer have it.

diff --git a/v7/src/compiler/rtlgen/rgcomb.scm b/v7/src/compiler/rtlgen/rgcomb.scm
index 7400b993b83d5cc64d0df125969bacba746d3edf..cdcfe194e11978afc2a252cb918135d7e8b68404 100644 (file)
--- a/v7/src/compiler/rtlgen/rgcomb.scm
+++ b/v7/src/compiler/rtlgen/rgcomb.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: rgcomb.scm,v 4.27 2009/02/02 16:02:17 riastradh Exp $
+$Id: rgcomb.scm,v 4.28 2009/02/03 03:33:44 riastradh Exp $
 
 Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
     1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
@@ -161,7 +161,6 @@ USA.
      (if (not (primitive-arity-correct? primitive frame-size))
         (error "Primitive called with incorrect number of arguments."
                primitive
-               arity
                frame-size))
      ((or (special-primitive-handler primitive)
          rtl:make-invocation:primitive)