--- a/Boolean.st	Wed Sep 15 09:04:48 1999 +0200
+++ b/Boolean.st	Wed Sep 15 14:22:07 1999 +0200
@@ -124,13 +124,6 @@
     ^ self
 !
 
-deepCopy
-    "return a deep copy of the receiver
-     - since both true and false are unique, return the receiver"
-
-    ^ self
-!
-
 deepCopyUsing:aDictionary
     "return a deep copy of the receiver
      - since both true and false are unique, return the receiver"
@@ -184,6 +177,14 @@
     ^ true
 ! !
 
+!Boolean methodsFor:'queries - asn1'!
+
+asn1Type
+    ^ OSI::ASN1_BOOLEAN primitiveType
+
+
+! !
+
 !Boolean methodsFor:'tracing'!
 
 traceInto:aRequestor level:level from:referrer
@@ -197,5 +198,5 @@
 !Boolean class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Boolean.st,v 1.24 1999-09-04 18:20:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Boolean.st,v 1.25 1999-09-15 12:21:48 cg Exp $'
 ! !