diff --git a/src/mzscheme/src/schapp.inc b/src/mzscheme/src/schapp.inc
index 5177486a3e..a4280ba274 100644
--- a/src/mzscheme/src/schapp.inc
+++ b/src/mzscheme/src/schapp.inc
@@ -38,7 +38,8 @@
 
 #if PRIM_CHECK_ARITY
   if (argc < prim->p.mina || (argc > prim->p.mu.maxa && prim->p.mina >= 0)) {
-    scheme_wrong_count(prim->p.name, prim->p.mina, prim->p.mu.maxa, argc, argv);
+    scheme_wrong_count_m(prim->p.name, prim->p.mina, prim->p.mu.maxa, argc, argv,
+                         prim->p.pp.flags & SCHEME_PRIM_IS_METHOD);
     return NULL; /* Shouldn't get here */
   }
 #endif
diff --git a/src/mzscheme/src/schnapp.inc b/src/mzscheme/src/schnapp.inc
index cb8f5a65b9..50baa5bd18 100644
--- a/src/mzscheme/src/schnapp.inc
+++ b/src/mzscheme/src/schnapp.inc
@@ -17,7 +17,8 @@ static MZ_INLINE Scheme_Object *PRIM_APPLY_NAME_FAST(Scheme_Object *rator,
   prim = (Scheme_Primitive_Proc *)rator;
   
   if (argc < prim->mina || (argc > prim->mu.maxa && prim->mina >= 0)) {
-    scheme_wrong_count(prim->name, prim->mina, prim->mu.maxa, argc, argv);
+    scheme_wrong_count_m(prim->name, prim->mina, prim->mu.maxa, argc, argv,
+                         prim->pp.flags & SCHEME_PRIM_IS_METHOD);
     return NULL; /* Shouldn't get here */
   }