Use non-scalar export feature from previous commit.

src/js/Types.js

@@ -136,7 +136,7 @@ var anonymous$1 = RTL$.extend({
 		this.set = null;
 	}
 });
-var basic = null;
+var basic = new anonymous$1();
 var numeric = null;
 var nil = null;
 TypeId.prototype.description = function(){
@@ -528,7 +528,6 @@ function initProcedure(p/*Procedure*/, name/*Type*/){
 function initModule(m/*Module*/, name/*Type*/){
 	m.name = name;
 }
-basic = new anonymous$1();
 basic.bool = makeBasic("BOOLEAN", "false");
 basic.ch = makeBasic("CHAR", "0");
 basic.integer = makeBasic("INTEGER", "0");

src/ob/Types.ob

@@ -131,7 +131,7 @@ TYPE
     PModule = POINTER TO Module;
 
 VAR
-    basic*: POINTER TO RECORD
+    basic*: RECORD
         bool, ch, integer, uint8, real, set: PBasicType
     END;
 
@@ -634,7 +634,6 @@ BEGIN
 END initModule;
 
 BEGIN
-    NEW(basic);
     basic.bool := makeBasic("BOOLEAN", "false");
     basic.ch := makeBasic("CHAR", "0");
     basic.integer := makeBasic("INTEGER", "0");