added speedUpXORs method to OMeta object

tristanls · Jan 26, 2010 · 86ea29c · 86ea29c
1 parent cef667d
commit 86ea29c
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/ometa-base.js b/ometa-base.js
@@ -237,6 +237,9 @@ OMeta = {
     else if (numMatches == 1) return ans
     else                      throw 'more than one choice matched in "exclusive-OR"'
   },
+  speedUpXORs: function() {
+    this._xor = this._or
+  },
   _many: function(x) {
     var ans = arguments[1] != undefined ? [arguments[1]] : []
     while (true) {