[js] Work around for unicode issue

MoarVM uses NFG while the js backend doesn't do it.
The js backend is cross compiling so that causes a problem with
our hardcoded as string literals lists of characters.
Work around it using nqp::chr(0x....).

Author: pmurias

src/HLL/Grammar.nqp

@@ -41,6 +41,9 @@ grammar HLL::Grammar {
     "\x[FE59]\x[FE5A]\x[FE5B]\x[FE5C]\x[FE5D]\x[FE5E]\x[FF08]\x[FF09]\x[FF1C]\x[FF1E]" ~
     "\x[FF3B]\x[FF3D]\x[FF5B]\x[FF5D]\x[FF5F]\x[FF60]\x[FF62]\x[FF63]\x[27EE]\x[27EF]" ~
     "\x[2E24]\x[2E25]\x[27EC]\x[27ED]\x[2E22]\x[2E23]\x[2E26]\x[2E27]" ~
+#?if js
+    nqp::chr(0x2329) ~ nqp::chr(0x232A) ~
+#?endif
     "\x[FD3E]\x[FD3F]"; # All brackets have matching Ps/Pe or Pi/Pf except \x[FD3E]\x[FD3F]
                         # (ORNATE PARENTHESIS), which are allowed since they are RTL Text characters
 

src/QRegex/P5Regex/Actions.nqp

@@ -201,6 +201,9 @@ class QRegex::P5Regex::Actions is HLL::Actions {
 
     method p5backslash:sym<h>($/) {
         make QAST::Regex.new(
+#?if js
+            nqp::chr(0x2000) ~ nqp::chr(0x2001) ~ # HACK workaround for a cross compiling problem
+#?endif
             "\x[09,20,a0,1680,180e,2000,2001,2002,2003,2004,2005,2006,2007,2008,2009,200a,202f,205f,3000]",
             :rxtype('enumcharlist'),
             :negate($<sym> eq 'H'),
@@ -556,6 +559,9 @@ class QRegex::P5Regex::Actions is HLL::Actions {
 
     method backslash:sym<h>($/) {
         my $qast := QAST::Regex.new(
+#?if js
+            nqp::chr(0x2000) ~ nqp::chr(0x2001) ~ # HACK workaround for a cross compiling problem
+#?endif
             "\x[09,20,a0,1680,180e,2000,2001,2002,2003,2004,2005,2006,2007,2008,2009,200a,202f,205f,3000]",
             :rxtype('enumcharlist'),
             :negate($<sym> eq 'H'),

src/QRegex/P6Regex/Actions.nqp

@@ -349,6 +349,9 @@ class QRegex::P6Regex::Actions is HLL::Actions {
     method backslash:sym<h>($/) {
 
         my $qast := QAST::Regex.new(
+#?if js
+            nqp::chr(0x2000) ~ nqp::chr(0x2001) ~ # HACK workaround for a cross compiling problem
+#?endif
             "\x[09,20,a0,1680,180e,2000,2001,2002,2003,2004,2005,2006,2007,2008,2009,200a,202f,205f,3000]",
             :rxtype('enumcharlist'),
             :negate($<sym> eq 'H'),
@@ -434,6 +437,9 @@ class QRegex::P6Regex::Actions is HLL::Actions {
 
     method cclass_backslash:sym<h>($/) {
         my $qast := QAST::Regex.new(
+#?if js
+            nqp::chr(0x2000) ~ nqp::chr(0x2001) ~ # HACK workaround for a cross compiling problem
+#?endif
             "\x[09,20,a0,1680,180e,2000,2001,2002,2003,2004,2005,2006,2007,2008,2009,200a,202f,205f,3000]",
             :rxtype('enumcharlist'),
             :negate($<sym> eq 'H'),