On Aug 3, 5:54 pm, Brian Marick wrote:
> In Midje, I have reason to create a type Metaconstant whose instances are
> "equal" to a symbol with the same name. Here's the relevant bits of the
> definition:
>
> (deftype Metaconstant [name storage]
> Object
> (equals [this that]
>
In Midje, I have reason to create a type Metaconstant whose instances are
"equal" to a symbol with the same name. Here's the relevant bits of the
definition:
(deftype Metaconstant [name storage]
Object
(equals [this that]
(if (instance? (class this) that)