Function _xsbug_script_

tools/test262/_262.c:321–364

}

void _xsbug_script_(txMachine* the)
{
	txSlot* realm = mxProgram.value.reference->next->value.module.realm;
	mxTry(the) {
		txParser _parser;
		txParser* parser = &_parser;
		txParserJump jump;
		txString name = NULL;
		txScript* script = NULL;
		fxInitializeParser(parser, the, the->parserBufferSize, the->parserTableModulo);
		parser->firstJump = &jump;
		if (c_setjmp(jump.jmp_buf) == 0) {
			txStringStream stream;
			stream.slot = mxArgv(3);
			stream.offset = 0;
			stream.size = fxToInteger(the, mxArgv(5)) - 1;
			parser->path = fxNewParserSymbol(parser, fxToString(the, mxArgv(1)));
			fxParserTree(parser, &stream, fxStringGetter, mxProgramFlag | mxDebugFlag | mxStrictFlag, &name);
			fxParserHoist(parser);
			fxParserBind(parser);
			script = fxParserCode(parser);
		}
	#ifdef mxInstrument
		if (the->peakParserSize < parser->total)
			the->peakParserSize = parser->total;
	#endif
		name = fxNewParserChunk(parser, 8 + parser->path->length);
		strcpy(name, "xsbug://");
		strcat(name, parser->path->string);
		mxModuleInstanceInternal(mxProgram.value.reference)->value.module.id = fxID(the, name);
		fxTerminateParser(parser);
		if (xsTest(xsArg(2)))
			gxTest262Async = TEST262_ASYNC_WAITING;
		fxRunScript(the, script, mxRealmGlobal(realm), C_NULL, mxRealmClosures(realm)->value.reference, C_NULL, mxProgram.value.reference);
		mxPop();
		if (gxTest262Async == TEST262_SYNC)
			fxBubble(the, 2, "<", 0, "test262");
	}
	mxCatch(the) {
		mxPush(mxException);
		fxBubble(the, 2, fxToString(the, the->stack), 0, "test262");
		mxPop();
	}
}

void fx_agent_get_safeBroadcast(xsMachine* the)
{