1 files changed, 68 insertions, 0 deletions
diff --git a/js/src/tests/test262/built-ins/RegExp/regexp-modifiers/syntax/valid/remove-modifiers-when-set-as-flags.js b/js/src/tests/test262/built-ins/RegExp/regexp-modifiers/syntax/valid/remove-modifiers-when-set-as-flags.js
new file mode 100644
index 0000000000..1b96c747a8
--- /dev/null
+++ b/js/src/tests/test262/built-ins/RegExp/regexp-modifiers/syntax/valid/remove-modifiers-when-set-as-flags.js
@@ -0,0 +1,68 @@
+// |reftest| skip -- regexp-modifiers is not supported
+// Copyright 2023 Ron Buckton. All rights reserved.
+// This code is governed by the BSD license found in the LICENSE file.
+
+/*---
+author: Ron Buckton
+description: >
+  Modifiers syntax `(?-ims:)` is legal.
+info: |
+  Runtime Semantics: CompileAtom
+  The syntax-directed operation CompileAtom takes arguments direction (forward or backward) and modifiers (a Modifiers Record) and returns a Matcher.
+
+  Atom :: `(` `?` RegularExpressionFlags `-` RegularExpressionFlags `:` Disjunction `)`
+    1. Let addModifiers be the source text matched by the first RegularExpressionFlags.
+    2. Let removeModifiers be the source text matched by the second RegularExpressionFlags.
+    3. Let newModifiers be UpdateModifiers(modifiers, CodePointsToString(addModifiers), CodePointsToString(removeModifiers)).
+    4. Return CompileSubpattern of Disjunction with arguments direction and newModifiers.
+
+  UpdateModifiers ( modifiers, add, remove )
+  The abstract operation UpdateModifiers takes arguments modifiers (a Modifiers Record), add (a String), and remove (a String) and returns a Modifiers. It performs the following steps when called:
+
+  1. Let dotAll be modifiers.[[DotAll]].
+  2. Let ignoreCase be modifiers.[[IgnoreCase]].
+  3. Let multiline be modifiers.[[Multiline]].
+  4. If add contains "s", set dotAll to true.
+  5. If add contains "i", set ignoreCase to true.
+  6. If add contains "m", set multiline to true.
+  7. If remove contains "s", set dotAll to false.
+  8. If remove contains "i", set ignoreCase to false.
+  9. If remove contains "m", set multiline to false.
+  10. Return the Modifiers Record { [[DotAll]]: dotAll, [[IgnoreCase]]: ignoreCase, [[Multiline]]: multiline }.
+
+esid: sec-compileatom
+features: [regexp-modifiers]
+---*/
+
+/(?-i:)/i;
+/(?-is:)/is;
+/(?-im:)/im;
+/(?-s:)/s;
+/(?-si:)/si;
+/(?-sm:)/sm;
+/(?-m:)/m;
+/(?-mi:)/mi;
+/(?-ms:)/ms;
+/(?-ims:)/ims;
+/(?-ism:)/ism;
+/(?-sim:)/sim;
+/(?-smi:)/smi;
+/(?-mis:)/mis;
+/(?-msi:)/msi;
+new RegExp("(?-i:)", "i");
+new RegExp("(?-is:)", "is");
+new RegExp("(?-im:)", "im");
+new RegExp("(?-s:)", "s");
+new RegExp("(?-si:)", "si");
+new RegExp("(?-sm:)", "sm");
+new RegExp("(?-m:)", "m");
+new RegExp("(?-mi:)", "mi");
+new RegExp("(?-ms:)", "ms");
+new RegExp("(?-ims:)", "ims");
+new RegExp("(?-ism:)", "ism");
+new RegExp("(?-sim:)", "sim");
+new RegExp("(?-smi:)", "smi");
+new RegExp("(?-mis:)", "mis");
+new RegExp("(?-msi:)", "msi");
+
+reportCompare(0, 0);