--- a/ObjMem.st	Thu Jan 04 00:39:17 1996 +0100
+++ b/ObjMem.st	Thu Jan 04 02:24:09 1996 +0100
@@ -668,9 +668,9 @@
      are turned on, false of off."
 
 %{  /* NOCONTEXT */
-    extern int __getDebugPrinting__();
-
-    RETURN (__getDebugPrinting__() ? true : false);
+    extern int __getDebugPrinting();
+
+    RETURN (__getDebugPrinting() ? true : false);
 %}
 !
 
@@ -683,7 +683,7 @@
      severe errors."
 
 %{  /* NOCONTEXT */
-    __setDebugPrinting__( (aBoolean == true) );
+    __setDebugPrinting( (aBoolean == true) );
 %}
 !
 
@@ -692,9 +692,9 @@
      are turned on, false of off."
 
 %{  /* NOCONTEXT */
-    extern int __getInfoPrinting__();
-
-    RETURN (__getInfoPrinting__() ? true : false);
+    extern int __getInfoPrinting();
+
+    RETURN (__getInfoPrinting() ? true : false);
 %}
 !
 
@@ -706,7 +706,7 @@
      are useful for ST/X developers."
 
 %{  /* NOCONTEXT */
-    __setInfoPrinting__( (aBoolean == true) );
+    __setInfoPrinting( (aBoolean == true) );
 %}
 ! !
 
@@ -719,7 +719,7 @@
      (true of trap was installed ok, false if failed) should be checked."
 
 %{  /* NOCONTEXT */
-    RETURN (__addTrapOnAccess__(anObject, 2) ? true : false);
+    RETURN (__addTrapOnAccess(anObject, 2) ? true : false);
 %}
 !
 
@@ -730,7 +730,7 @@
      (true of trap was installed ok, false if failed) should be checked."
 
 %{  /* NOCONTEXT */
-    RETURN (__addTrapOnAccess__(anObject, 0) ? true : false);
+    RETURN (__addTrapOnAccess(anObject, 0) ? true : false);
 %}
 !
 
@@ -741,7 +741,7 @@
      (true of trap was installed ok, false if failed) should be checked."
 
 %{  /* NOCONTEXT */
-    RETURN (__addTrapOnAccess__(anObject, 1) ? true : false);
+    RETURN (__addTrapOnAccess(anObject, 1) ? true : false);
 %}
 !
 
@@ -749,7 +749,7 @@
     "remove all access traps"
 
 %{  /* NOCONTEXT */
-    __removeAllAccessTraps__();
+    __removeAllAccessTraps();
 %} 
 !
 
@@ -757,7 +757,7 @@
     "remove any access trap for anObject."
 
 %{  /* NOCONTEXT */
-    __removeTrapOnAccess__(anObject);
+    __removeTrapOnAccess(anObject);
 %}
 ! !
 
@@ -3225,6 +3225,6 @@
 !ObjectMemory class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ObjMem.st,v 1.86 1996-01-03 23:29:24 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ObjMem.st,v 1.87 1996-01-04 01:23:04 cg Exp $'
 ! !
 ObjectMemory initialize!