Skip to content
Browse files

Perlito5 - V8 patch for perl5-ish accessors

  • Loading branch information...
1 parent 8c165e0 commit db495c1b8f8e92b693b8fa5f5f504b5e8edb9a0b @fglock committed
Showing with 106 additions and 0 deletions.
  1. +106 −0 misc/V8/perl5ish.patch
View
106 misc/V8/perl5ish.patch
@@ -0,0 +1,106 @@
+Index: src/v8natives.js
+===================================================================
+--- src/v8natives.js (revision 12644)
++++ src/v8natives.js (working copy)
+@@ -1331,7 +1331,7 @@
+ }
+ b = %_ValueOf(b);
+ }
+- return b ? 'true' : 'false';
++ return b ? '1' : '';
+ }
+
+
+Index: src/runtime.js
+===================================================================
+--- src/runtime.js (revision 12644)
++++ src/runtime.js (working copy)
+@@ -550,14 +550,14 @@
+ function ToString(x) {
+ if (IS_STRING(x)) return x;
+ if (IS_NUMBER(x)) return %_NumberToString(x);
+- if (IS_BOOLEAN(x)) return x ? 'true' : 'false';
++ if (IS_BOOLEAN(x)) return x ? '1' : '';
+ if (IS_UNDEFINED(x)) return 'undefined';
+ return (IS_NULL(x)) ? 'null' : %ToString(%DefaultString(x));
+ }
+
+ function NonStringToString(x) {
+ if (IS_NUMBER(x)) return %_NumberToString(x);
+- if (IS_BOOLEAN(x)) return x ? 'true' : 'false';
++ if (IS_BOOLEAN(x)) return x ? '1' : '';
+ if (IS_UNDEFINED(x)) return 'undefined';
+ return (IS_NULL(x)) ? 'null' : %ToString(%DefaultString(x));
+ }
+Index: src/array.js
+===================================================================
+--- src/array.js (revision 12644)
++++ src/array.js (working copy)
+@@ -195,7 +195,7 @@
+ function ConvertToString(x) {
+ // Assumes x is a non-string.
+ if (IS_NUMBER(x)) return %_NumberToString(x);
+- if (IS_BOOLEAN(x)) return x ? 'true' : 'false';
++ if (IS_BOOLEAN(x)) return x ? '1' : '';
+ return (IS_NULL_OR_UNDEFINED(x)) ? '' : %ToString(%DefaultString(x));
+ }
+
+@@ -426,6 +426,36 @@
+ }
+
+
++function ArrayP5Get(index) {
++ if (IS_NULL_OR_UNDEFINED(this) && !IS_UNDETECTABLE(this)) {
++ throw MakeTypeError("called_on_null_or_undefined",
++ ["Array.prototype.p5aget"]);
++ }
++
++ var i = TO_INT32(index);
++ var n = TO_UINT32(this.length);
++ if (i < 0) {
++ i = i + n;
++ }
++ return this[i];
++}
++
++function ArrayP5Set(index, value) {
++ if (IS_NULL_OR_UNDEFINED(this) && !IS_UNDETECTABLE(this)) {
++ throw MakeTypeError("called_on_null_or_undefined",
++ ["Array.prototype.p5aget"]);
++ }
++
++ var i = TO_INT32(index);
++ var n = TO_UINT32(this.length);
++ if (i < 0) {
++ i = i + n;
++ }
++ this[i] = value;
++ return this[i];
++}
++
++
+ // Removes the last element from the array and returns it. See
+ // ECMA-262, section 15.4.4.6.
+ function ArrayPop() {
+@@ -1520,6 +1550,8 @@
+ // Manipulate the length of some of the functions to meet
+ // expectations set by ECMA-262 or Mozilla.
+ InstallFunctions($Array.prototype, DONT_ENUM, $Array(
++ "p5aget", getFunction("p5aget", ArrayP5Get, 1),
++ "p5aset", getFunction("p5aset", ArrayP5Set, 2),
+ "toString", getFunction("toString", ArrayToString),
+ "toLocaleString", getFunction("toLocaleString", ArrayToLocaleString),
+ "join", getFunction("join", ArrayJoin),
+Index: src/mirror-debugger.js
+===================================================================
+--- src/mirror-debugger.js (revision 12644)
++++ src/mirror-debugger.js (working copy)
+@@ -521,7 +521,7 @@
+
+
+ BooleanMirror.prototype.toText = function() {
+- return this.value_ ? 'true' : 'false';
++ return this.value_ ? '1' : '';
+ };
+
+

0 comments on commit db495c1

Please sign in to comment.
Something went wrong with that request. Please try again.