From 00525dc4a927bbb79c839bbd68f8aa465402e1fa Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Tue, 13 Feb 2001 20:54:30 +0000 Subject: [PATCH] . original commit: 0baf74d2b2db0dcc2731a864798f331c10c283b0 --- collects/mzlib/class.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/mzlib/class.ss b/collects/mzlib/class.ss index 9ec2754..dbdcbf1 100644 --- a/collects/mzlib/class.ss +++ b/collects/mzlib/class.ss @@ -195,7 +195,7 @@ [use-final-indices (get-indices use-final-ids)] [replace-indices (get-indices replace-ids)] [new-indices (get-indices new-ids)] - [method-prim-vec (make-vector width (and primitive #f))]) + [method-prim-vec (make-vector width (and primitive #t))]) ;; Copy super's method prim flags: (let ([svec (class-method-prim-vec super)])