---

Execution module Instructions manual

---

OKit: Object Tree, RPL Virtual Machine and compiler shared library Copyright (C) 2000 Yann LANDRIN-SCHWEITZER This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA Author: Yann LANDRIN-SCHWEITZER Contact: varkhan@free.fr Homepage: http://varkhan.free.fr/

---

USES ErrLog.h

---

OKit_Object evaluation

Function OKit_ObjectEval

OKit_Status OKit_ObjectEval(OKit_Stack stk, OKit_NameSpace dom, OKit_Object obj) ;
Evaluates an OKit_Object.

	Args
		_stk	:	OKit_Stack environment
		_dom	:	Variables environment
		_obj	:	OKit_Object to execute

	Returns
		_{-1, ""}	:	if a NULL OKit_Stack, OKit_NameSpace or OKit_Object was passed as argument
		_{ 0, "" }	:	if the execution terminated normally
		else a return OKit_Status.

	Errors
		_EINVAL	:	if a NULL OKit_Stack, OKit_NameSpace or OKit_Object was passed as argument

Function OKit_ListEval

OKit_Status OKit_ListEval(OKit_Stack stk, OKit_NameSpace dom, OKit_List lst) ;
Evaluates a OKit_List.

	Args
		_stk	:	OKit_Stack environment
		_dom	:	Variables environment
		_lst	:	list to execute

	Returns
		_{-1, ""}	:	if a NULL OKit_Stack or OKit_NameSpace was passed as argument
		_{ 0, "" }	:	if the execution terminated normally
		else a return OKit_Status.

	Errors
		_EINVAL	:	if a NULL OKit_Stack or OKit_NameSpace was passed as argument

Function OKit_CodeEval

OKit_Status OKit_CodeEval(OKit_Stack stk, OKit_NameSpace dom, OKit_Code cod) ;
Evaluates a OKit_Code object.

	Args
		_stk	:	OKit_Stack environment
		_dom	:	Variables environment
		_cod	:

	Returns
		_{-1, ""}	:	if a NULL OKit_Stack, OKit_NameSpace or OKit_Code was passed as argument
		_{ 0, "" }	:	if the execution terminated normally
		else a return OKit_Status.

	Errors
		_EINVAL	:	if a NULL OKit_Stack, OKit_NameSpace or OKit_Code was passed as argument

Function OKit_BltnEval

OKit_Status OKit_BltnEval(OKit_Stack stk, OKit_NameSpace dom, OKit_Bltn blt) ;
Evaluates a Built-in.

	Args
		_stk	:	OKit_Stack environment
		_dom	:	Variables environment
		_blt	:

	Returns
		_{-1, ""}	:	if a NULL OKit_Stack, OKit_NameSpace or OKit_Bltn was passed as argument
		_{ 0, "" }	:	if the execution terminated normally
		else a return OKit_Status.

	Errors
		_EINVAL	:	if a NULL OKit_Stack, OKit_NameSpace or OKit_Bltn was passed as argument