From 1709b4c0f4b91c993cb3e3556bb9c65dd93dc935 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sat, 22 Oct 2005 01:56:45 +0000
Subject: [PATCH] added object-method-arity-includes

svn: r1123

original commit: f3a67ccb9a97aa0b770abde9ec614cd8d7716641
---
 collects/mzlib/class.ss | 1 +
 1 file changed, 1 insertion(+)

diff --git a/collects/mzlib/class.ss b/collects/mzlib/class.ss
index f98c652..e731fa7 100644
--- a/collects/mzlib/class.ss
+++ b/collects/mzlib/class.ss
@@ -26,6 +26,7 @@
 	   generic make-generic send-generic
 	   is-a? subclass? implementation? interface-extension?
 	   object-interface object-info object->vector
+	   object-method-arity-includes?
 	   method-in-interface? interface->method-names class->interface class-info
 	   (struct exn:fail:object ())
 	   make-primitive-class