[regexp] Port RegExpCompile and RegExpToString

src/js/regexp.js

 // Copyright 2012 the V8 project authors. All rights reserved.
 // Use of this source code is governed by a BSD-style license that can be
 // found in the LICENSE file.
 
 (function(global, utils) {
 
 'use strict';
 
 %CheckIsBootstrapping();
 
@@ skipping 54 matching lines @@
 // ES#sec-regexpinitialize
 // Runtime Semantics: RegExpInitialize ( obj, pattern, flags )
 function RegExpInitialize(object, pattern, flags) {
   pattern = IS_UNDEFINED(pattern) ? '' : TO_STRING(pattern);
   flags = IS_UNDEFINED(flags) ? '' : TO_STRING(flags);
   %RegExpInitializeAndCompile(object, pattern, flags);
   return object;
 }
 
 
-function PatternFlags(pattern) {
-  return (REGEXP_GLOBAL(pattern) ? 'g' : '') +
-         (REGEXP_IGNORE_CASE(pattern) ? 'i' : '') +
-         (REGEXP_MULTILINE(pattern) ? 'm' : '') +
-         (REGEXP_UNICODE(pattern) ? 'u' : '') +
-         (REGEXP_STICKY(pattern) ? 'y' : '');
-}
-
-
-// ES#sec-regexp.prototype.compile RegExp.prototype.compile (pattern, flags)
-function RegExpCompileJS(pattern, flags) {
-  if (!IS_REGEXP(this)) {
-    throw %make_type_error(kIncompatibleMethodReceiver,
-                        "RegExp.prototype.compile", this);
-  }
-
-  if (IS_REGEXP(pattern)) {
-    if (!IS_UNDEFINED(flags)) throw %make_type_error(kRegExpFlags);
-
-    flags = PatternFlags(pattern);
-    pattern = REGEXP_SOURCE(pattern);
-  }
-
-  RegExpInitialize(this, pattern, flags);
-
-  // Return undefined for compatibility with JSC.
-  // See http://crbug.com/585775 for web compat details.
-}
-
-
 function DoRegExpExec(regexp, string, index) {
   return %_RegExpExec(regexp, string, index, RegExpLastMatchInfo);
 }
 
 
 // This is kind of performance sensitive, so we want to avoid unnecessary
 // type checks on inputs. But we also don't want to inline it several times
 // manually, so we use a macro :-)
 macro RETURN_NEW_RESULT_FROM_MATCH_INFO(MATCHINFO, STRING)
   var numResults = NUMBER_OF_CAPTURES(MATCHINFO) >> 1;
@@ skipping 44 matching lines @@
     throw %make_type_error(kIncompatibleMethodReceiver,
                         'RegExp.prototype.test', this);
   }
   string = TO_STRING(string);
   var match = RegExpSubclassExec(this, string);
   return !IS_NULL(match);
 }
 %FunctionRemovePrototype(RegExpSubclassTest);
 
 
-function RegExpToString() {
-  if (!IS_RECEIVER(this)) {
-    throw %make_type_error(
-        kIncompatibleMethodReceiver, 'RegExp.prototype.toString', this);
-  }
-  if (this === GlobalRegExpPrototype) {
-    %IncrementUseCounter(kRegExpPrototypeToString);
-  }
-  return '/' + TO_STRING(this.source) + '/' + TO_STRING(this.flags);
-}
-
-
 function AtSurrogatePair(subject, index) {
   if (index + 1 >= subject.length) return false;
   var first = %_StringCharCodeAt(subject, index);
   if (first < 0xD800 || first > 0xDBFF) return false;
   var second = %_StringCharCodeAt(subject, index + 1);
   return second >= 0xDC00 && second <= 0xDFFF;
 }
 
 
 // Fast path implementation of RegExp.prototype[Symbol.split] which
@@ skipping 583 matching lines @@
   if (IS_NULL(result)) return -1;
   return result.index;
 }
 %FunctionRemovePrototype(RegExpSubclassSearch);
 
 
 // -------------------------------------------------------------------
 
 utils.InstallFunctions(GlobalRegExp.prototype, DONT_ENUM, [
   "test", RegExpSubclassTest,
-  "toString", RegExpToString,
-  "compile", RegExpCompileJS,
   matchSymbol, RegExpSubclassMatch,
   replaceSymbol, RegExpSubclassReplace,
   searchSymbol, RegExpSubclassSearch,
   splitSymbol, RegExpSubclassSplit,
 ]);
 
 %InstallToContext(["regexp_last_match_info", RegExpLastMatchInfo]);
 
 // -------------------------------------------------------------------
 // Internal
@@ skipping 26 matching lines @@
   to.GetSubstitution = GetSubstitution;
   to.InternalRegExpMatch = InternalRegExpMatch;
   to.InternalRegExpReplace = InternalRegExpReplace;
   to.IsRegExp = IsRegExp;
   to.RegExpExec = DoRegExpExec;
   to.RegExpInitialize = RegExpInitialize;
   to.RegExpLastMatchInfo = RegExpLastMatchInfo;
 });
 
 })