comparison src/bytecode.c @ 444:576fb035e263 r21-2-37

Import from CVS: tag r21-2-37
author cvs
date Mon, 13 Aug 2007 11:36:19 +0200
parents abe6d1db359e
children 183866b06e0b
comparison
equal deleted inserted replaced
443:a8296e22da4e 444:576fb035e263
2262 CHECK_COMPILED_FUNCTION (function); 2262 CHECK_COMPILED_FUNCTION (function);
2263 return compiled_function_constants (XCOMPILED_FUNCTION (function)); 2263 return compiled_function_constants (XCOMPILED_FUNCTION (function));
2264 } 2264 }
2265 2265
2266 DEFUN ("compiled-function-stack-depth", Fcompiled_function_stack_depth, 1, 1, 0, /* 2266 DEFUN ("compiled-function-stack-depth", Fcompiled_function_stack_depth, 1, 1, 0, /*
2267 Return the max stack depth of the compiled-function object FUNCTION. 2267 Return the maximum stack depth of the compiled-function object FUNCTION.
2268 */ 2268 */
2269 (function)) 2269 (function))
2270 { 2270 {
2271 CHECK_COMPILED_FUNCTION (function); 2271 CHECK_COMPILED_FUNCTION (function);
2272 return make_int (compiled_function_stack_depth (XCOMPILED_FUNCTION (function))); 2272 return make_int (compiled_function_stack_depth (XCOMPILED_FUNCTION (function)));