| Index: src/s390/code-stubs-s390.cc
|
| diff --git a/src/s390/code-stubs-s390.cc b/src/s390/code-stubs-s390.cc
|
| index b66d79b8cbeb976ec563702d1e56ba86d413a82b..15d54751d0a3ef835449722b2e02ca4b9302422c 100644
|
| --- a/src/s390/code-stubs-s390.cc
|
| +++ b/src/s390/code-stubs-s390.cc
|
| @@ -1205,6 +1205,87 @@
|
| __ b(r14);
|
| }
|
|
|
| +void RegExpExecStub::Generate(MacroAssembler* masm) {
|
| +#ifdef V8_INTERPRETED_REGEXP
|
| + // This case is handled prior to the RegExpExecStub call.
|
| + __ Abort(kUnexpectedRegExpExecCall);
|
| +#else // V8_INTERPRETED_REGEXP
|
| + __ CleanseP(r14);
|
| +
|
| + // Isolates: note we add an additional parameter here (isolate pointer).
|
| + const int kRegExpExecuteArguments = 10;
|
| + const int kParameterRegisters = 5;
|
| + __ EnterExitFrame(false, kRegExpExecuteArguments - kParameterRegisters);
|
| +
|
| + // Stack pointer now points to cell where return address is to be written.
|
| + // Arguments are before that on the stack or in registers.
|
| +
|
| + // Argument 10 (in stack parameter area): Pass current isolate address.
|
| + __ mov(r6, Operand(ExternalReference::isolate_address(isolate())));
|
| + __ StoreP(r6, MemOperand(sp, kStackFrameExtraParamSlot * kPointerSize +
|
| + 4 * kPointerSize));
|
| +
|
| + // Argument 9 is a dummy that reserves the space used for
|
| + // the return address added by the ExitFrame in native calls.
|
| + __ mov(r6, Operand::Zero());
|
| + __ StoreP(r6, MemOperand(sp, kStackFrameExtraParamSlot * kPointerSize +
|
| + 3 * kPointerSize));
|
| +
|
| + // Argument 8: Indicate that this is a direct call from JavaScript.
|
| + __ mov(r6, Operand(1));
|
| + __ StoreP(r6, MemOperand(sp, kStackFrameExtraParamSlot * kPointerSize +
|
| + 2 * kPointerSize));
|
| +
|
| + // Argument 7: Start (high end) of backtracking stack memory area.
|
| + ExternalReference address_of_regexp_stack_memory_address =
|
| + ExternalReference::address_of_regexp_stack_memory_address(isolate());
|
| + ExternalReference address_of_regexp_stack_memory_size =
|
| + ExternalReference::address_of_regexp_stack_memory_size(isolate());
|
| + __ mov(r6, Operand(address_of_regexp_stack_memory_address));
|
| + __ LoadP(r6, MemOperand(r6, 0));
|
| + __ mov(r1, Operand(address_of_regexp_stack_memory_size));
|
| + __ LoadP(r1, MemOperand(r1, 0));
|
| + __ AddP(r6, r1);
|
| + __ StoreP(r6, MemOperand(sp, kStackFrameExtraParamSlot * kPointerSize +
|
| + 1 * kPointerSize));
|
| +
|
| + // Argument 6: Set the number of capture registers to zero to force
|
| + // global egexps to behave as non-global. This does not affect non-global
|
| + // regexps.
|
| + __ mov(r6, Operand::Zero());
|
| + __ StoreP(r6, MemOperand(sp, kStackFrameExtraParamSlot * kPointerSize +
|
| + 0 * kPointerSize));
|
| +
|
| + // Argument 5 (r6): static offsets vector buffer.
|
| + __ mov(
|
| + r6,
|
| + Operand(ExternalReference::address_of_static_offsets_vector(isolate())));
|
| +
|
| + // Argument 4, r5: End of string data
|
| + // Argument 3, r4: Start of string data
|
| + CHECK(r5.is(RegExpExecDescriptor::StringEndRegister()));
|
| + CHECK(r4.is(RegExpExecDescriptor::StringStartRegister()));
|
| +
|
| + // Argument 2 (r3): Previous index.
|
| + CHECK(r3.is(RegExpExecDescriptor::LastIndexRegister()));
|
| +
|
| + // Argument 1 (r2): Subject string.
|
| + CHECK(r2.is(RegExpExecDescriptor::StringRegister()));
|
| +
|
| + // Locate the code entry and call it.
|
| + Register code_reg = RegExpExecDescriptor::CodeRegister();
|
| + __ AddP(code_reg, Operand(Code::kHeaderSize - kHeapObjectTag));
|
| +
|
| + DirectCEntryStub stub(isolate());
|
| + stub.GenerateCall(masm, code_reg);
|
| +
|
| + __ LeaveExitFrame(false, no_reg, true);
|
| +
|
| + // Return the smi-tagged result.
|
| + __ SmiTag(r2);
|
| + __ Ret();
|
| +#endif // V8_INTERPRETED_REGEXP
|
| +}
|
|
|
| static void CallStubInRecordCallTarget(MacroAssembler* masm, CodeStub* stub) {
|
| // r2 : number of arguments to the construct function
|
|
|