porffor 0.2.0-eeb45f8 → 0.2.0-ef043de

package/compiler/builtins.js

@@ -1,5 +1,8 @@
 import { Blocktype, Opcodes, Valtype, ValtypeSize } from "./wasmSpec.js";
 import { number, i32x4 } from "./embedding.js";
+import Prefs from './prefs.js';
+import * as GeneratedBuiltins from './generated_builtins.js';
+import { TYPES } from './types.js';
 
 export const importedFuncs = [
   {
@@ -19,6 +22,24 @@ export const importedFuncs = [
     import: 't',
     params: 0,
     returns: 1
+  },
+  {
+    name: 'timeOrigin',
+    import: 'u',
+    params: 0,
+    returns: 1
+  },
+  {
+    name: 'profile1',
+    import: 'y',
+    params: 1,
+    returns: 0
+  },
+  {
+    name: 'profile2',
+    import: 'z',
+    params: 1,
+    returns: 0
   }
 ];
 
@@ -50,10 +71,10 @@ export const NULL = 0;
 
 export const BuiltinVars = function() {
   this.undefined = number(UNDEFINED);
-  this.undefined.type = 'undefined';
+  this.undefined.type = TYPES.undefined;
 
   this.null = number(NULL);
-  this.null.type = 'object';
+  this.null.type = TYPES.object;
 
   this.NaN = number(NaN);
   this.NaN.floatOnly = true;
@@ -117,6 +138,18 @@ export const BuiltinVars = function() {
 
   // stubs just so that parent objects exist
   this.Math = number(1);
+
+  // wintercg(tm)
+  this.__navigator_userAgent = (scope, { makeString }) => makeString(scope, `Porffor/0.2.0`, false, '__navigator_userAgent');
+  this.__navigator_userAgent.type = Prefs.bytestring ? TYPES._bytestring : TYPES.string;
+
+  for (const x in TYPES) {
+    this['__Porffor_TYPES_' + x] = number(TYPES[x]);
+  }
+
+  this.__performance_timeOrigin = [
+    [ Opcodes.call, importedFuncs.timeOrigin ]
+  ];
 };
 
 export const BuiltinFuncs = function() {
@@ -170,43 +203,25 @@ export const BuiltinFuncs = function() {
     ]
   };
 
-  // todo: return false for NaN
-  this.Boolean = {
-    params: [ valtypeBinary ],
-    locals: [],
-    returns: [ valtypeBinary ],
-    returnType: 'boolean',
-    wasm: [
-      [ Opcodes.local_get, 0 ],
-      ...(valtype === 'f64' ? [
-        ...number(0),
-        [ Opcodes.f64_ne ]
-      ] : [
-        ...Opcodes.eqz,
-        [ Opcodes.i32_eqz ]
-      ]),
-      Opcodes.i32_from
-    ]
-  };
-
   // just return given (default 0) for (new) Object() as we somewhat supports object just not constructor
   this.Object = {
     params: [ valtypeBinary ],
     locals: [],
     returns: [ valtypeBinary ],
-    returnType: 'object',
+    returnType: TYPES.object,
     wasm: [
-      [ Opcodes.local_get, 0 ]
+      // [ Opcodes.local_get, 0 ]
+      ...number(1)
     ]
   };
 
 
-  this.__console_log = {
+  this.__Porffor_print = {
     params: [ valtypeBinary, Valtype.i32 ],
     typedParams: true,
     locals: [ Valtype.i32, Valtype.i32 ],
     returns: [],
-    wasm: (scope, { TYPES, typeSwitch }) => [
+    wasm: (scope, { typeSwitch }) => [
       ...typeSwitch(scope, [ [ Opcodes.local_get, 1 ] ], {
         [TYPES.number]: [
           [ Opcodes.local_get, 0 ],
@@ -258,6 +273,40 @@ export const BuiltinFuncs = function() {
 
           [ Opcodes.end ]
         ],
+        [TYPES._bytestring]: [
+          // simply print a (byte)string :))
+          // cache input pointer as i32
+          [ Opcodes.local_get, 0 ],
+          Opcodes.i32_to_u,
+          [ Opcodes.local_tee, 2 ],
+
+          // make end pointer
+          [ Opcodes.i32_load, Math.log2(ValtypeSize.i32) - 1, 0 ],
+          [ Opcodes.local_get, 2 ],
+          [ Opcodes.i32_add ],
+          [ Opcodes.local_set, 3 ],
+
+          [ Opcodes.loop, Blocktype.void ],
+
+          // print current char
+          [ Opcodes.local_get, 2 ],
+          [ Opcodes.i32_load8_u, Math.log2(ValtypeSize.i16) - 1, ValtypeSize.i32 ],
+          Opcodes.i32_from_u,
+          [ Opcodes.call, importedFuncs.printChar ],
+
+          // increment pointer
+          [ Opcodes.local_get, 2 ],
+          [ Opcodes.i32_const, 1 ],
+          [ Opcodes.i32_add ],
+          [ Opcodes.local_tee, 2 ],
+
+          // if pointer != end pointer, loop
+          [ Opcodes.local_get, 3 ],
+          [ Opcodes.i32_ne ],
+          [ Opcodes.br_if, 0 ],
+
+          [ Opcodes.end ]
+        ],
         [TYPES._array]: [
           ...printStaticStr('[ '),
 
@@ -319,10 +368,7 @@ export const BuiltinFuncs = function() {
           [ Opcodes.local_get, 0 ],
           [ Opcodes.call, importedFuncs.print ],
         ]
-      }, Blocktype.void),
-
-      ...char('\n'),
-      [ Opcodes.call, importedFuncs.printChar ]
+      }, Blocktype.void)
     ]
   };
 
@@ -334,7 +380,7 @@ export const BuiltinFuncs = function() {
     params: [ valtypeBinary ],
     locals: [],
     returns: [ valtypeBinary ],
-    returnType: 'boolean',
+    returnType: TYPES.boolean,
     wasm: [
       [ Opcodes.local_get, 0 ],
       [ Opcodes.local_get, 0 ],
@@ -349,7 +395,7 @@ export const BuiltinFuncs = function() {
     params: [ valtypeBinary ],
     locals: [ valtypeBinary ],
     returns: [ valtypeBinary ],
-    returnType: 'boolean',
+    returnType: TYPES.boolean,
     wasm: [
       [ Opcodes.local_get, 0 ],
       [ Opcodes.local_get, 0 ],
@@ -368,7 +414,7 @@ export const BuiltinFuncs = function() {
     params: [ valtypeBinary ],
     locals: [],
     returns: [ valtypeBinary ],
-    returnType: 'boolean',
+    returnType: TYPES.boolean,
     wasm: [
       [ Opcodes.local_get, 0 ],
       [ Opcodes.local_get, 0 ],
@@ -383,7 +429,7 @@ export const BuiltinFuncs = function() {
     params: [ valtypeBinary ],
     locals: [],
     returns: [ valtypeBinary ],
-    returnType: 'boolean',
+    returnType: TYPES.boolean,
     wasm: [
       [ Opcodes.local_get, 0 ],
       [ Opcodes.local_get, 0 ],
@@ -523,61 +569,314 @@ export const BuiltinFuncs = function() {
 
   // this is an implementation of xorshift128+ (in wasm bytecode)
   // fun fact: v8, SM, JSC also use this (you will need this fun fact to maintain your sanity reading this code)
-  const prngSeed0 = Math.floor(Math.random() * Number.MAX_SAFE_INTEGER), prngSeed1 = Math.floor(Math.random() * Number.MAX_SAFE_INTEGER);
+  // const prngSeed0 = Math.floor(Math.random() * Number.MAX_SAFE_INTEGER), prngSeed1 = Math.floor(Math.random() * Number.MAX_SAFE_INTEGER);
+  const prngSeed0 = (Math.random() * (2 ** 30)) | 0, prngSeed1 = (Math.random() * (2 ** 30)) | 0;
+
+  const prng = ({
+    'lcg32_glibc': {
+      globals: [ Valtype.i32 ],
+      locals: [],
+      returns: Valtype.i32,
+      wasm: [
+        // seed = (MULTIPLIER * seed + INCREMENT) % MODULUS
+        // MULTIPLIER * state0
+        [ Opcodes.global_get, 0 ],
+        ...number(1103515245, Valtype.i32),
+        [ Opcodes.i32_mul ],
+
+        // + INCREMENT
+        ...number(12345, Valtype.i32),
+        [ Opcodes.i32_add ],
+
+        // % MODULUS
+        ...number(2 ** 31, Valtype.i32),
+        [ Opcodes.i32_rem_s ],
+
+        // state0 =
+        [ Opcodes.global_set, 0 ],
+
+        // state0
+        [ Opcodes.global_get, 0 ],
+      ],
+    },
+    'lcg32_minstd': {
+      globals: [ Valtype.i32 ],
+      locals: [],
+      returns: Valtype.i32,
+      wasm: [
+        // seed = (MULTIPLIER * seed + INCREMENT) % MODULUS
+        // MULTIPLIER * state0
+        [ Opcodes.global_get, 0 ],
+        ...number(48271, Valtype.i32),
+        [ Opcodes.i32_mul ],
+
+        // % MODULUS
+        ...number((2 ** 31) - 1, Valtype.i32),
+        [ Opcodes.i32_rem_s ],
+
+        // state0 =
+        [ Opcodes.global_set, 0 ],
+
+        // state0
+        [ Opcodes.global_get, 0 ],
+      ],
+    },
+    'lcg64_musl': 0, // todo
+
+    'xorshift32+': {
+      globals: [ Valtype.i32 ],
+      locals: [ Valtype.i32 ],
+      returns: Valtype.i32,
+      wasm: [
+        // setup: s1 = state0
+        [ Opcodes.global_get, 0 ], // state0
+        [ Opcodes.local_tee, 0 ], // s1
+
+        // s1 ^= s1 << 13
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.i32_const, 13 ],
+        [ Opcodes.i32_shl ], // <<
+        [ Opcodes.i32_xor ], // ^
+        [ Opcodes.local_tee, 0 ], // s1
+
+        // s1 ^= s1 >> 17
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.i32_const, 17 ],
+        [ Opcodes.i32_shr_s ], // >>
+        [ Opcodes.i32_xor ], // ^
+        [ Opcodes.local_tee, 0 ], // s1
+
+        // s1 ^= s1 << 5
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.i32_const, 5 ],
+        [ Opcodes.i32_shl ], // <<
+        [ Opcodes.i32_xor ], // ^
+        [ Opcodes.local_tee, 0 ], // s1
+
+        // state0 = s1
+        [ Opcodes.global_set, 0 ],
+
+        // s1
+        [ Opcodes.local_get, 0 ],
+      ],
+    },
+
+    'xorshift64+': {
+      globals: [ Valtype.i64 ],
+      locals: [ Valtype.i64 ],
+      returns: Valtype.i64,
+      wasm: [
+        // setup: s1 = state0
+        [ Opcodes.global_get, 0 ], // state0
+        [ Opcodes.local_tee, 0 ], // s1
+
+        // s1 ^= s1 >> 12
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.i64_const, 12 ],
+        [ Opcodes.i64_shr_s ], // >>
+        [ Opcodes.i64_xor ], // ^
+        [ Opcodes.local_tee, 0 ], // s1
+
+        // s1 ^= s1 << 25
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.i64_const, 25 ],
+        [ Opcodes.i64_shl ], // <<
+        [ Opcodes.i64_xor ], // ^
+        [ Opcodes.local_tee, 0 ], // s1
+
+        // s1 ^= s1 >> 27
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.i64_const, 27 ],
+        [ Opcodes.i64_shr_s ], // >>
+        [ Opcodes.i64_xor ], // ^
+        [ Opcodes.local_tee, 0 ], // s1
+
+        // state0 = s1
+        [ Opcodes.global_set, 0 ],
+
+        // // s1 * 0x2545F4914F6CDD1D
+        // [ Opcodes.local_get, 0 ],
+        // [ Opcodes.i64_const, 0x9d, 0xba, 0xb3, 0xfb, 0x94, 0x92, 0xfd, 0xa2, 0x25 ],
+        // [ Opcodes.i64_mul ]
+
+        // s1
+        [ Opcodes.local_get, 0 ],
+      ],
+    },
+
+    'xorshift128+': {
+      globals: [ Valtype.i64, Valtype.i64 ],
+      locals: [ Valtype.i64, Valtype.i64 ],
+      returns: Valtype.i64,
+      wasm: [
+        // setup: s1 = state0, s0 = state1, state0 = s0
+        [ Opcodes.global_get, 0 ], // state0
+        [ Opcodes.local_tee, 0 ], // s1
+        [ Opcodes.global_get, 1 ], // state1
+        [ Opcodes.local_tee, 1, ], // s0
+        [ Opcodes.global_set, 0 ], // state0
+
+        // s1 ^= s1 << 23
+        // [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.i64_const, 23 ],
+        [ Opcodes.i64_shl ], // <<
+        [ Opcodes.i64_xor ], // ^
+        [ Opcodes.local_set, 0 ], // s1
+
+        // state1 = s1 ^ s0 ^ (s1 >> 17) ^ (s0 >> 26)
+        // s1 ^ s0
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.local_get, 1 ], // s0
+        [ Opcodes.i64_xor ], // ^
+
+        // ^ (s1 >> 17)
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.i64_const, 17 ],
+        [ Opcodes.i64_shr_u ], // >>
+        [ Opcodes.i64_xor ], // ^
+
+        // ^ (s0 >> 26)
+        [ Opcodes.local_get, 1 ], // s0
+        [ Opcodes.i64_const, 26 ],
+        [ Opcodes.i64_shr_u ], // >>
+        [ Opcodes.i64_xor ], // ^
+
+        // state1 =
+        [ Opcodes.global_set, 1 ],
+
+        // state1 + s0
+        [ Opcodes.global_get, 1 ], // state1
+        [ Opcodes.local_get, 1 ], // s0
+        [ Opcodes.i64_add ]
+      ]
+    },
+
+    'xoroshiro128+': {
+      globals: [ Valtype.i64, Valtype.i64 ],
+      locals: [ Valtype.i64, Valtype.i64, Valtype.i64 ],
+      returns: Valtype.i64,
+      wasm: [
+        // setup: s1 = state1, s0 = state0
+        [ Opcodes.global_get, 1 ], // state0
+        [ Opcodes.local_tee, 0 ], // s1
+        [ Opcodes.global_get, 0 ], // state1
+        [ Opcodes.local_tee, 1, ], // s0
+
+        // result = s0 + s1
+        [ Opcodes.i64_add ],
+        [ Opcodes.local_set, 2 ], // result
+
+        // s1 ^= s0
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.local_get, 1 ], // s0
+        [ Opcodes.i64_xor ],
+        [ Opcodes.local_set, 0 ], // s1
+
+        // state0 = rotl(s0, 24) ^ s1 ^ (s1 << 16)
+
+        // rotl(s0, 24) ^ s1
+        [ Opcodes.local_get, 1 ], // s0
+        ...number(24, Valtype.i64),
+        [ Opcodes.i64_rotl ],
+        [ Opcodes.local_get, 0 ], // s1
+        [ Opcodes.i64_xor ],
+
+        // ^ (s1 << 16)
+        [ Opcodes.local_get, 0 ], // s1
+        ...number(16, Valtype.i64),
+        [ Opcodes.i64_shl ],
+        [ Opcodes.i64_xor ],
+
+        // state0 =
+        [ Opcodes.global_set, 0 ], // state0
+
+        // state1 = rotl(s1, 37)
+        [ Opcodes.local_get, 0 ], // s1
+        ...number(37, Valtype.i64),
+        [ Opcodes.i64_rotl ],
+        [ Opcodes.global_set, 1 ], // state1
+
+        // result
+        [ Opcodes.local_get, 2 ],
+      ]
+    },
+
+    'xoshiro128+': {
+      globals: [ Valtype.i32, Valtype.i32, Valtype.i32, Valtype.i32 ],
+      locals: [ Valtype.i32, Valtype.i32 ],
+      returns: Valtype.i32,
+      wasm: [
+        // result = state0 + state3
+        [ Opcodes.global_get, 0 ], // state0
+        [ Opcodes.global_get, 3 ], // state0
+        [ Opcodes.i32_add ],
+        [ Opcodes.local_set, 0 ], // result
+
+        // t = state1 << 9
+        [ Opcodes.global_get, 1 ], // state1
+        ...number(9, Valtype.i32),
+        [ Opcodes.i32_shl ],
+        [ Opcodes.local_set, 1 ], // t
+
+        // state2 ^= state0
+        [ Opcodes.global_get, 2 ], // state2
+        [ Opcodes.global_get, 0 ], // state0
+        [ Opcodes.i32_xor ],
+        [ Opcodes.global_set, 2 ], // state2
+
+        // state3 ^= state1
+        [ Opcodes.global_get, 3 ], // state3
+        [ Opcodes.global_get, 1 ], // state1
+        [ Opcodes.i32_xor ],
+        [ Opcodes.global_set, 3 ], // state3
+
+        // state1 ^= state2
+        [ Opcodes.global_get, 1 ], // state1
+        [ Opcodes.global_get, 2 ], // state2
+        [ Opcodes.i32_xor ],
+        [ Opcodes.global_set, 1 ], // state1
+
+        // state0 ^= state3
+        [ Opcodes.global_get, 0 ], // state2
+        [ Opcodes.global_get, 3 ], // state0
+        [ Opcodes.i32_xor ],
+        [ Opcodes.global_set, 0 ], // state2
+
+        // state2 ^= t
+        [ Opcodes.global_get, 2 ], // state2
+        [ Opcodes.local_get, 1 ], // t
+        [ Opcodes.i32_xor ],
+        [ Opcodes.global_set, 2 ], // state2
+
+        // state3 = rotl(state3, 11)
+        [ Opcodes.global_get, 3 ], // state3
+        ...number(11, Valtype.i32),
+        [ Opcodes.i32_rotl ],
+        [ Opcodes.global_set, 3 ], // state3
+
+        // result
+        [ Opcodes.local_get, 0 ],
+      ]
+    }
+  })[Prefs.prng ?? 'xorshift128+'];
+
+  if (!prng) throw new Error(`unknown prng algo: ${Prefs.prng}`);
 
   this.__Math_random = {
     floatOnly: true,
     params: [],
-    locals: [ Valtype.i64, Valtype.i64 ],
+    locals: prng.locals,
     localNames: [ 's1', 's0' ],
-    globals: [ Valtype.i64, Valtype.i64 ],
+    globals: prng.globals,
     globalNames: [ 'state0', 'state1' ],
     globalInits: [ prngSeed0, prngSeed1 ],
     returns: [ Valtype.f64 ],
     wasm: [
-      // setup: s1 = state0, s0 = state1, state0 = s0
-      [ Opcodes.global_get, 0 ], // state0
-      [ Opcodes.local_tee, 0 ], // s1
-      [ Opcodes.global_get, 1 ], // state1
-      [ Opcodes.local_tee, 1, ], // s0
-      [ Opcodes.global_set, 0 ], // state0
-
-      // s1 ^= s1 << 23
-      // [ Opcodes.local_get, 0 ], // s1
-      [ Opcodes.local_get, 0 ], // s1
-      [ Opcodes.i64_const, 23 ],
-      [ Opcodes.i64_shl ], // <<
-      [ Opcodes.i64_xor ], // ^
-      [ Opcodes.local_set, 0 ], // s1
-
-      // state1 = s1 ^ s0 ^ (s1 >> 17) ^ (s0 >> 26)
-      // s1 ^ s0
-      [ Opcodes.local_get, 0 ], // s1
-      [ Opcodes.local_get, 1 ], // s0
-      [ Opcodes.i64_xor ], // ^
-
-      // ^ (s1 >> 17)
-      [ Opcodes.local_get, 0 ], // s1
-      [ Opcodes.i64_const, 17 ],
-      [ Opcodes.i64_shr_u ], // >>
-      [ Opcodes.i64_xor ], // ^
-
-      // ^ (s0 >> 26)
-      [ Opcodes.local_get, 1 ], // s0
-      [ Opcodes.i64_const, 26 ],
-      [ Opcodes.i64_shr_u ], // >>
-      [ Opcodes.i64_xor ], // ^
-
-      // state1 =
-      [ Opcodes.global_set, 1 ],
+      ...prng.wasm,
 
       // you thought it was over? now we need the result as a f64 between 0-1 :)
 
-      // state1 + s0
-      [ Opcodes.global_get, 1 ], // state1
-      [ Opcodes.local_get, 1 ], // s0
-      [ Opcodes.i64_add ],
-
       // should we >> 12 here?
       // it feels like it but it breaks values
 
@@ -592,15 +891,72 @@ export const BuiltinFuncs = function() {
       // ...number(1),
       // [ Opcodes.f64_sub ],
 
-      ...number((1 << 53) - 1, Valtype.i64),
-      [ Opcodes.i64_and ],
+      ...(prng.returns === Valtype.i64 ? [
+        ...number((1 << 53) - 1, Valtype.i64),
+        [ Opcodes.i64_and ],
+
+        // double(mantissa)
+        [ Opcodes.f64_convert_i64_u ],
+
+        // / (1 << 53)
+        ...number(1 << 53),
+        [ Opcodes.f64_div ]
+      ] : [
+        ...number((1 << 21) - 1, Valtype.i32),
+        [ Opcodes.i32_and ],
 
-      // double(mantissa)
-      [ Opcodes.f64_convert_i64_u ],
+        // double(mantissa)
+        [ Opcodes.f64_convert_i32_u ],
 
-      // / (1 << 53)
-      ...number(1 << 53),
-      [ Opcodes.f64_div ]
+        // / (1 << 21)
+        ...number(1 << 21),
+        [ Opcodes.f64_div ]
+      ])
+    ]
+  };
+
+  // this.__Porffor_randomInt = {
+  //   params: [],
+  //   locals: prng.locals,
+  //   localNames: [ 's1', 's0' ],
+  //   globals: prng.globals,
+  //   globalNames: [ 'state0', 'state1' ],
+  //   globalInits: [ prngSeed0, prngSeed1 ],
+  //   returns: [ Valtype.i32 ],
+  //   wasm: [
+  //     ...prng.wasm,
+
+  //     ...(prng.returns === Valtype.i64 ? [
+  //       // the lowest bits of the output generated by xorshift128+ have low quality
+  //       ...number(56, Valtype.i64),
+  //       [ Opcodes.i64_shr_u ],
+
+  //       [ Opcodes.i32_wrap_i64 ],
+  //     ] : []),
+  //   ]
+  // };
+
+  this.__Porffor_randomByte = {
+    params: [],
+    locals: prng.locals,
+    localNames: [ 's1', 's0' ],
+    globals: prng.globals,
+    globalNames: [ 'state0', 'state1' ],
+    globalInits: [ prngSeed0, prngSeed1 ],
+    returns: [ Valtype.i32 ],
+    wasm: [
+      ...prng.wasm,
+
+      ...(prng.returns === Valtype.i64 ? [
+        // the lowest bits of the output generated by xorshift128+ have low quality
+        ...number(56, Valtype.i64),
+        [ Opcodes.i64_shr_u ],
+
+        [ Opcodes.i32_wrap_i64 ],
+      ] : []),
+
+      ...number(0xff, Valtype.i32),
+      [ Opcodes.i32_and ],
     ]
   };
 
@@ -679,7 +1035,7 @@ export const BuiltinFuncs = function() {
     params: [ valtypeBinary ],
     locals: [],
     returns: [ valtypeBinary ],
-    returnType: 'boolean',
+    returnType: TYPES.boolean,
     wasm: [
       [ Opcodes.local_get, 0 ],
       ...number(0),
@@ -699,206 +1055,51 @@ export const BuiltinFuncs = function() {
   };
 
 
-  this.__SIMD_i32x4_load = {
-    params: [ Valtype.i32 ],
-    locals: [],
-    returns: [ Valtype.v128 ],
-    wasm: [
-      [ Opcodes.local_get, 0 ],
-      [ ...Opcodes.v128_load, 0, 0 ]
-    ]
-  };
-
-  this.__SIMD_i32x4_splat = {
-    params: [ Valtype.i32 ],
-    locals: [],
-    returns: [ Valtype.v128 ],
-    wasm: [
-      [ Opcodes.local_get, 0 ],
-      [ ...Opcodes.i32x4_splat ],
-    ]
-  };
-
-  this.__SIMD_i16x8_create = {
-    params: [ Valtype.i32, Valtype.i32, Valtype.i32, Valtype.i32, Valtype.i32, Valtype.i32, Valtype.i32, Valtype.i32 ],
-    locals: [],
-    returns: [ Valtype.v128 ],
-    wasm: [
-      ...i32x4(0, 0, 0, 0),
-      [ Opcodes.local_get, 0 ],
-      [ ...Opcodes.i16x8_replace_lane, 0 ],
-      [ Opcodes.local_get, 1 ],
-      [ ...Opcodes.i16x8_replace_lane, 1 ],
-      [ Opcodes.local_get, 2 ],
-      [ ...Opcodes.i16x8_replace_lane, 2 ],
-      [ Opcodes.local_get, 3 ],
-      [ ...Opcodes.i16x8_replace_lane, 3 ],
-      [ Opcodes.local_get, 4 ],
-      [ ...Opcodes.i16x8_replace_lane, 4 ],
-      [ Opcodes.local_get, 5 ],
-      [ ...Opcodes.i16x8_replace_lane, 5 ],
-      [ Opcodes.local_get, 6 ],
-      [ ...Opcodes.i16x8_replace_lane, 6 ],
-      [ Opcodes.local_get, 7 ],
-      [ ...Opcodes.i16x8_replace_lane, 7 ],
-    ]
-  };
-
-  this.__SIMD_i32x4_dot_i16x8 = {
-    params: [ Valtype.v128, Valtype.v128 ],
-    locals: [],
-    returns: [ Valtype.v128 ],
-    wasm: [
-      [ Opcodes.local_get, 0 ],
-      [ Opcodes.local_get, 1 ],
-      [ ...Opcodes.i32x4_dot_i16x8_s ]
-    ]
-  };
-
-  this.__SIMD_i32x4_create = {
-    params: [ Valtype.i32, Valtype.i32, Valtype.i32, Valtype.i32 ],
-    locals: [],
-    returns: [ Valtype.v128 ],
-    wasm: [
-      ...i32x4(0, 0, 0, 0),
-      [ Opcodes.local_get, 0 ],
-      [ ...Opcodes.i32x4_replace_lane, 0 ],
-      [ Opcodes.local_get, 1 ],
-      [ ...Opcodes.i32x4_replace_lane, 1 ],
-      [ Opcodes.local_get, 2 ],
-      [ ...Opcodes.i32x4_replace_lane, 2 ],
-      [ Opcodes.local_get, 3 ],
-      [ ...Opcodes.i32x4_replace_lane, 3 ],
-    ]
-  };
-
-  this.__SIMD_i32x4_add = {
-    params: [ Valtype.v128, Valtype.v128 ],
-    locals: [],
-    returns: [ Valtype.v128 ],
-    wasm: [
-      [ Opcodes.local_get, 0 ],
-      [ Opcodes.local_get, 1 ],
-      [ ...Opcodes.i32x4_add ]
-    ]
+  this.__Porffor_type = {
+    params: [ valtypeBinary, Valtype.i32 ],
+    typedParams: true,
+    locals: [ Valtype.i32, Valtype.i32 ],
+    returns: [ valtypeBinary ],
+    returnType: Prefs.bytestring ? TYPES._bytestring : TYPES.string,
+    wasm: (scope, { TYPE_NAMES, typeSwitch, makeString }) => {
+      const bc = {};
+      for (const x in TYPE_NAMES) {
+        bc[x] = makeString(scope, TYPE_NAMES[x], false, '#Porffor_type_result');
+      }
+
+      return typeSwitch(scope, [ [ Opcodes.local_get, 1 ] ], bc);
+    }
   };
 
-  this.__SIMD_i32x4_sub = {
-    params: [ Valtype.v128, Valtype.v128 ],
+  this.__Porffor_rawType = {
+    params: [ valtypeBinary, Valtype.i32 ],
+    typedParams: true,
     locals: [],
-    returns: [ Valtype.v128 ],
+    returns: [ valtypeBinary ],
     wasm: [
-      [ Opcodes.local_get, 0 ],
       [ Opcodes.local_get, 1 ],
-      [ ...Opcodes.i32x4_sub ]
+      Opcodes.i32_from_u
     ]
   };
 
-  this.__SIMD_i32x4_mul = {
-    params: [ Valtype.v128, Valtype.v128 ],
+  this.__Porffor_clone = {
+    params: [ valtypeBinary, valtypeBinary ],
     locals: [],
-    returns: [ Valtype.v128 ],
+    returns: [],
     wasm: [
-      [ Opcodes.local_get, 0 ],
+      // dst
       [ Opcodes.local_get, 1 ],
-      [ ...Opcodes.i32x4_mul ]
-    ]
-  };
-
-  this.__SIMD_i32x4_get0 = {
-    params: [ Valtype.v128 ],
-    locals: [],
-    returns: [ Valtype.i32 ],
-    wasm: [
-      [ Opcodes.local_get, 0 ],
-      [ ...Opcodes.i32x4_extract_lane, 0 ],
-    ],
-  },
+      Opcodes.i32_to_u,
 
-  this.__SIMD_i32x4_get1 = {
-    params: [ Valtype.v128 ],
-    locals: [],
-    returns: [ Valtype.i32 ],
-    wasm: [
+      // src
       [ Opcodes.local_get, 0 ],
-      [ ...Opcodes.i32x4_extract_lane, 1 ],
-    ],
-  };
+      Opcodes.i32_to_u,
 
-  this.__SIMD_i32x4_get2 = {
-    params: [ Valtype.v128 ],
-    locals: [],
-    returns: [ Valtype.i32 ],
-    wasm: [
-      [ Opcodes.local_get, 0 ],
-      [ ...Opcodes.i32x4_extract_lane, 2 ],
-    ],
-  };
-
-  this.__SIMD_i32x4_get3 = {
-    params: [ Valtype.v128 ],
-    locals: [],
-    returns: [ Valtype.i32 ],
-    wasm: [
-      [ Opcodes.local_get, 0 ],
-      [ ...Opcodes.i32x4_extract_lane, 3 ],
-    ],
-  };
-
-  this.__SIMD_i32x4_shuffle_000c = {
-    params: [ Valtype.v128 ],
-    locals: [],
-    returns: [ Valtype.v128 ],
-    wasm: [
-      [ Opcodes.local_get, 0 ],
-      ...i32x4(0, 0, 0, 0),
-      [ ...Opcodes.i8x16_shuffle, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 8, 9, 10, 11 ], // i32x4 (a, b, c, d) -> i32x4 (0, 0, 0, c)
+      // size = pageSize
+      ...number(pageSize, Valtype.i32),
+      [ ...Opcodes.memory_copy, 0x00, 0x00 ],
     ]
   };
 
-  this.__SIMD_i32x4_shuffle_00ab = {
-    params: [ Valtype.v128 ],
-    locals: [],
-    returns: [ Valtype.v128 ],
-    wasm: [
-      [ Opcodes.local_get, 0 ],
-      ...i32x4(0, 0, 0, 0),
-      [ ...Opcodes.i8x16_shuffle, 16, 16, 16, 16, 16, 16, 16, 16, 0, 1, 2, 3, 4, 5, 6, 7 ], // i32x4 (a, b, c, d) -> i32x4 (0, 0, a, b)
-    ]
-  };
-};
-
-export const BuiltinPreludes = {
-  btoa: `var keyStr = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=";
-var btoa = function (input) {
-  // todo: throw invalid character for unicode
-
-  let output = "";
-  let chr1, chr2, chr3, enc1, enc2, enc3, enc4;
-  let i = 0;
-
-  while (i < input.length) {
-    chr1 = input.charCodeAt(i++);
-    chr2 = input.charCodeAt(i++);
-    chr3 = input.charCodeAt(i++);
-
-    enc1 = chr1 >> 2;
-    enc2 = ((chr1 & 3) << 4) | (chr2 >> 4);
-    enc3 = ((chr2 & 15) << 2) | (chr3 >> 6);
-    enc4 = chr3 & 63;
-
-    if (isNaN(chr2)) {
-      enc3 = enc4 = 64;
-    } else if (isNaN(chr3)) {
-      enc4 = 64;
-    }
-
-    output += keyStr.charAt(enc1);
-    output += keyStr.charAt(enc2);
-    output += keyStr.charAt(enc3);
-    output += keyStr.charAt(enc4);
-  }
-
-  return output;
-};`
+  GeneratedBuiltins.BuiltinFuncs.call(this);
 };