porffor 0.57.27 → 0.57.29

package/compiler/builtins/_internal_object.ts

@@ -395,22 +395,14 @@ return`;
 export const __Porffor_object_accessorGet = (entryPtr: i32): Function|undefined => {
   const out: Function = Porffor.wasm.i32.load(entryPtr, 0, 8);
 
-  // no getter, return undefined
-  if (Porffor.wasm`local.get ${out}` == 0) {
-    return undefined;
-  }
-
+  if (Porffor.wasm`local.get ${out}` == 0) return undefined;
   return out;
 };
 
 export const __Porffor_object_accessorSet = (entryPtr: i32): Function|undefined => {
   const out: Function = Porffor.wasm.i32.load(entryPtr, 0, 12);
 
-  // no setter, return undefined
-  if (Porffor.wasm`local.get ${out}` == 0) {
-    return undefined;
-  }
-
+  if (Porffor.wasm`local.get ${out}` == 0) return undefined;
   return out;
 };
 
@@ -507,12 +499,7 @@ local.set ${obj+1}`;
       lastProto = obj;
     }
 
-    if (entryPtr == -1) {
-      Porffor.wasm`
-f64.const 0
-i32.const 128
-return`;
-    }
+    if (entryPtr == -1) return undefined;
   }
 
   const tail: i32 = Porffor.wasm.i32.load16_u(entryPtr, 0, 16);
@@ -520,14 +507,7 @@ return`;
     // accessor descriptor
     const get: Function = __Porffor_object_accessorGet(entryPtr);
 
-    // no getter, return undefined
-    if (Porffor.wasm`local.get ${get}` == 0) {
-      Porffor.wasm`
-f64.const 0
-i32.const 128
-return`;
-    }
-
+    if (Porffor.wasm`local.get ${get}` == 0) return undefined;
     return get.call(obj);
   }
 
@@ -585,12 +565,7 @@ local.set ${obj+1}`;
       lastProto = obj;
     }
 
-    if (entryPtr == -1) {
-      Porffor.wasm`
-f64.const 0
-i32.const 128
-return`;
-    }
+    if (entryPtr == -1) return undefined;
   }
 
   const tail: i32 = Porffor.wasm.i32.load16_u(entryPtr, 0, 16);
@@ -598,14 +573,7 @@ return`;
     // accessor descriptor
     const get: Function = __Porffor_object_accessorGet(entryPtr);
 
-    // no getter, return undefined
-    if (Porffor.wasm`local.get ${get}` == 0) {
-      Porffor.wasm`
-f64.const 0
-i32.const 128
-return`;
-    }
-
+    if (Porffor.wasm`local.get ${get}` == 0) return undefined;
     return get.call(obj);
   }
 

package/compiler/builtins/annexb_string.js

@@ -19,14 +19,26 @@ export const __ByteString_prototype_${a0} = (_this: bytestring) =>
   noArgs('sup', 'sup');
 
   const arg = (name, s1, s2) => out += `
-export const __String_prototype_${name} = (_this: string, arg: any) =>
-  Porffor.concatStrings(
+export const __String_prototype_${name} = (_this: string, arg: any) => {
+  arg = ecma262.ToString(arg);
+  let escaped: bytestring = Porffor.allocate();
+  for (let i = 0; i < arg.length; i++) {
+    const c = arg.charCodeAt(i);
+    if (c != 34) {
+      __Porffor_bytestring_appendChar(escaped, c);
+    } else {
+      __Porffor_bytestring_appendStr(escaped, '&quot;');
+    }
+  }
+  
+  return Porffor.concatStrings(
     Porffor.concatStrings(
       Porffor.concatStrings(
-        Porffor.concatStrings('<${s1} ${s2}="', arg),
+        Porffor.concatStrings('<${s1} ${s2}="', escaped),
         '">'),
       _this),
     '</${s1}>');
+}
 export const __ByteString_prototype_${name} = (_this: bytestring, arg: any) =>
   __String_prototype_${name}(_this, arg);`;
 
@@ -35,7 +47,7 @@ export const __ByteString_prototype_${name} = (_this: bytestring, arg: any) =>
   arg('anchor', 'a', 'name');
   arg('link', 'a', 'href');
 
-  const prototypeAlias = (regular, annex) => `
+  const prototypeAlias = (regular, annex) => out += `
 export const __String_prototype_${annex} = (_this: any) =>
   __String_prototype_${regular}(_this);
 export const __ByteString_prototype_${annex} = (_this: any) =>

package/compiler/builtins/array.ts

@@ -746,8 +746,11 @@ export const __Array_prototype_toReversed = (_this: any[]) => {
   let out: any[] = Porffor.allocate();
   out.length = len;
 
-  while (start < end) {
+  while (true) {
     out[start] = _this[end];
+    if (start >= end) {
+      break;
+    }
     out[end--] = _this[start++];
   }
 

package/compiler/builtins/regexp.ts

@@ -87,8 +87,41 @@ export const __RegExp_prototype_source$get = (_this: RegExp) => {
   return Porffor.wasm.i32.load(_this, 0, 0) as bytestring;
 };
 
+// 22.2.6.4 get RegExp.prototype.flags
+// https://tc39.es/ecma262/multipage/text-processing.html#sec-get-regexp.prototype.flags
 export const __RegExp_prototype_flags$get = (_this: RegExp) => {
-  return Porffor.wasm.i32.load(_this, 0, 4) as bytestring;
+  // 1. Let R be the this value.
+  // 2. If R is not an Object, throw a TypeError exception.
+  if (!Porffor.object.isObject(_this)) throw new TypeError('This is a non-object');
+  let flags: i32 = Porffor.wasm.i32.load(_this, 0, 8);
+  // 3. Let codeUnits be a new empty List.
+  let result: bytestring = Porffor.allocateBytes(4 + 8);
+  // 4. Let hasIndices be ToBoolean(? Get(R, "hasIndices")).
+  // 5. If hasIndices is true, append the code unit 0x0064 (LATIN SMALL LETTER D) to codeUnits.
+  if (flags & 0b01000000) Porffor.bytestring.appendChar(result, 0x64);
+  // 6. Let global be ToBoolean(? Get(R, "global")).
+  // 7. If global is true, append the code unit 0x0067 (LATIN SMALL LETTER G) to codeUnits.
+  if (flags & 0b00000001) Porffor.bytestring.appendChar(result, 0x67);
+  // 8. Let ignoreCase be ToBoolean(? Get(R, "ignoreCase")).
+  // 9. If ignoreCase is true, append the code unit 0x0069 (LATIN SMALL LETTER I) to codeUnits.
+  if (flags & 0b00000010) Porffor.bytestring.appendChar(result, 0x69);
+  // 10. Let multiline be ToBoolean(? Get(R, "multiline")).
+  // 11. If multiline is true, append the code unit 0x006D (LATIN SMALL LETTER M) to codeUnits.
+  if (flags & 0b00000100) Porffor.bytestring.appendChar(result, 0x6d);
+  // 12. Let dotAll be ToBoolean(? Get(R, "dotAll")).
+  // 13. If dotAll is true, append the code unit 0x0073 (LATIN SMALL LETTER S) to codeUnits.
+  if (flags & 0b00001000) Porffor.bytestring.appendChar(result, 0x73);
+  // 14. Let unicode be ToBoolean(? Get(R, "unicode")).
+  // 15. If unicode is true, append the code unit 0x0075 (LATIN SMALL LETTER U) to codeUnits.
+  if (flags & 0b00010000) Porffor.bytestring.appendChar(result, 0x75);
+  // 16. Let unicodeSets be ToBoolean(? Get(R, "unicodeSets")).
+  // 17. If unicodeSets is true, append the code unit 0x0076 (LATIN SMALL LETTER V) to codeUnits.
+  if (flags & 0b10000000) Porffor.bytestring.appendChar(result, 0x76);
+  // 18. Let sticky be ToBoolean(? Get(R, "sticky")).
+  // 19. If sticky is true, append the code unit 0x0079 (LATIN SMALL LETTER Y) to codeUnits.
+  if (flags & 0b00100000) Porffor.bytestring.appendChar(result, 0x79);
+  // 20. Return the String value whose code units are the elements of the List codeUnits. If codeUnits has no elements, the empty String is returned.
+  return result;
 };
 
 export const __RegExp_prototype_global$get = (_this: RegExp) => {

package/compiler/builtins/symbol.ts

@@ -80,6 +80,8 @@ export const __Symbol_prototype_valueOf = (_this: Symbol) => {
 
 const forStore: Map = new Map();
 export const __Symbol_for = (key: any): Symbol => {
+  key = ecma262.ToString(key);
+
   if (forStore.has(key)) return forStore.get(key);
 
   const out: Symbol = Symbol(key);