shithub: libmujs

Info  •  Files  •  Log  •  Branches

Implement js_replace.

js_replace moves the value at top of the stack to the specified
stack slot.

--- a/jsrun.c

+++ b/jsrun.c

@@ -346,6 +346,19 @@

 	--TOP;

 }

+void js_insert(js_State *J, int idx)

+{

+	js_error(J, "not implemented yet");

+}

+

+void js_replace(js_State* J, int idx)

+{

+	idx = idx < 0 ? TOP + idx : BOT + idx;

+	if (idx < BOT || idx >= TOP)

+		js_error(J, "stack error!");

+	STACK[idx] = STACK[--TOP];

+}

+

 void js_copy(js_State *J, int idx)

 {

 	CHECKSTACK(1);