avoid leading colon for id

svn: r937
This commit is contained in:
Matthew Flatt 2005-09-29 15:49:48 +00:00
parent 457d23c390
commit 74a64f50da

View File

@ -1,4 +1,5 @@
#kd
(module class-internal mzscheme
(require (lib "list.ss")
(lib "etc.ss")
@ -67,7 +68,7 @@
;; class macros
;;--------------------------------------------------------------------
(define-syntaxes (class* :class class/derived)
(define-syntaxes (class* _class class/derived)
(let ()
;; Start with Helper functions
@ -3177,7 +3178,7 @@
extract-vtable
extract-method-ht)
(rename :class class) class* class/derived
(rename _class class) class* class/derived
define-serializable-class define-serializable-class*
class?
mixin