[jvm] Implement '−' (U+2212) minus support in nqp::radix(_I)

pmurias · pmurias · commit 225bdadaf5d7 · 2019-12-04T15:57:57.000+01:00
diff --git a/src/vm/jvm/runtime/org/perl6/nqp/runtime/Ops.java b/src/vm/jvm/runtime/org/perl6/nqp/runtime/Ops.java
@@ -4096,8 +4096,8 @@ public static SixModelObject radix(long radix, String str, long zpos, long flags
         }
 
         ch = (zpos < chars) ? str.charAt((int)zpos) : 0;
-        if ((flags & 0x02) != 0 && (ch == '+' || ch == '-')) {
-            neg = (ch == '-');
+        if ((flags & 0x02) != 0 && (ch == '+' || ch == '-' || ch == '−')) {
+            neg = (ch == '-' || ch == '−');
             zpos++;
             ch = (zpos < chars) ? str.charAt((int)zpos) : 0;
         }
@@ -7281,8 +7281,8 @@ public static SixModelObject radix_I(long radix_l, String str, long zpos, long f
         }
 
         ch = (zpos < chars) ? str.charAt((int)zpos) : 0;
-        if ((flags & 0x02) != 0 && (ch == '+' || ch == '-')) {
-            neg = (ch == '-');
+        if ((flags & 0x02) != 0 && (ch == '+' || ch == '-' || ch == '−')) {
+            neg = (ch == '-' || ch == '−');
             zpos++;
             ch = (zpos < chars) ? str.charAt((int)zpos) : 0;
         }

Original file line number	Diff line number	Diff line change
`@@ -4096,8 +4096,8 @@ public static SixModelObject radix(long radix, String str, long zpos, long flags`
`4096`	`4096`	`}`
`4097`	`4097`
`4098`	`4098`	`ch = (zpos < chars) ? str.charAt((int)zpos) : 0;`
`4099`		`- if ((flags & 0x02) != 0 && (ch == '+' \|\| ch == '-')) {`
`4100`		`- neg = (ch == '-');`
	`4099`	`+ if ((flags & 0x02) != 0 && (ch == '+' \|\| ch == '-' \|\| ch == '−')) {`
	`4100`	`+ neg = (ch == '-' \|\| ch == '−');`
`4101`	`4101`	`zpos++;`
`4102`	`4102`	`ch = (zpos < chars) ? str.charAt((int)zpos) : 0;`
`4103`	`4103`	`}`
`@@ -7281,8 +7281,8 @@ public static SixModelObject radix_I(long radix_l, String str, long zpos, long f`
`7281`	`7281`	`}`
`7282`	`7282`
`7283`	`7283`	`ch = (zpos < chars) ? str.charAt((int)zpos) : 0;`
`7284`		`- if ((flags & 0x02) != 0 && (ch == '+' \|\| ch == '-')) {`
`7285`		`- neg = (ch == '-');`
	`7284`	`+ if ((flags & 0x02) != 0 && (ch == '+' \|\| ch == '-' \|\| ch == '−')) {`
	`7285`	`+ neg = (ch == '-' \|\| ch == '−');`
`7286`	`7286`	`zpos++;`
`7287`	`7287`	`ch = (zpos < chars) ? str.charAt((int)zpos) : 0;`
`7288`	`7288`	`}`