--- a/VoidObject.st Wed Mar 14 19:03:13 2018 +0100
+++ b/VoidObject.st Wed Mar 14 19:32:38 2018 +0100
@@ -71,8 +71,14 @@
!VoidObject class methodsFor:'class initialization'!
initialize
- Smalltalk at:#Void put:(self basicNew).
- Smalltalk at:#void put:(self basicNew). "/ for JavaScript code
+ |singleton|
+
+ singleton := self basicNew.
+ Smalltalk
+ at:#Void put:singleton;
+ at:#void put:singleton. "/ for JavaScript code
+
+ "Modified: / 14-03-2018 / 19:32:23 / stefan"
! !
!VoidObject methodsFor:'printing & storing'!