# HG changeset patch
# User Matthew Wild <mwild1@gmail.com>
# Date 1290567002 0
# Node ID 2e2d08e3669c2c82f02784e01d13625a99f493e4
# Parent  afce5a550d18d5c2d87e552b64f03127abcf6a66
OP_TAILCALL: Fall through to OP_CALL for native functions

diff -r afce5a550d18 -r 2e2d08e3669c lvm.js
--- a/lvm.js	Wed Nov 24 02:49:40 2010 +0000
+++ b/lvm.js	Wed Nov 24 02:50:02 2010 +0000
@@ -503,19 +503,22 @@
 				break;
 			case OP_TAILCALL:
 				var f = frame.reg[INS_A(instruction)].precall();
-				var A = INS_A(instruction), B = INS_B(instruction);
-				var undefined, args;
-				if(B != 1)
-					args = frame.reg.slice(A+1, B==0?undefined:(A+B));
-				else
-					args = [];
-				if(args.length > f.numParameters)
-					args.length = f.numParameters;
-				for(var i=args.length;i<f.maxStackSize;i++)
-					args[i] = new LValue(this, "nil", null);
-				// Patch frame for new function
-				frame.f = f; frame.pc = 0; frame.reg = args;
-				break;
+				if(typeof(f) != "function") // Can't tail-call native functions
+				{
+					var A = INS_A(instruction), B = INS_B(instruction);
+					var undefined, args;
+					if(B != 1)
+						args = frame.reg.slice(A+1, B==0?undefined:(A+B));
+					else
+						args = [];
+					if(args.length > f.numParameters)
+						args.length = f.numParameters;
+					for(var i=args.length;i<f.maxStackSize;i++)
+						args[i] = new LValue(this, "nil", null); // Patch frame for new function
+					frame.f = f; frame.pc = 0; frame.reg = args;
+					break;
+				}
+				// Fall through...
 			case OP_CALL:
 				var f = frame.reg[INS_A(instruction)].precall(); // return JS or LFunction
 				var A = INS_A(instruction), B = INS_B(instruction), C = INS_C(instruction);