Aug 29 19:13 2013 opcodes_lisp.lua Page 1


--[[ Semantic Opcode Module for the Kamin Lisp Interpreter
     KILT -- Kamin Interpreters in Lua Toolset
     H. Conrad Cunningham, Professor
     Computer and Information Science
     University of Mississippi

Developed for CSci 658, Software Language Engineering, Fall 2013

2013-08-17: Separated from Scheme code into a module
2013-08-24: Reverted Scheme changes to build Lisp module.
2013-08-29: Added return of empty table

1234567890123456789012345678901234567890123456789012345678901234567890

--]]

-- All of these are constants introduced as GLOBAL variables.

FUNDEF     = "FunDef"
VARVAL     = "VarVal"

-- BEGIN change/add for Lisp
-- NUMVAL     = "NumVal"
NUMSXP     = "SExprNum"
SYMSXP     = "SExprSym"
NILSXP     = "SExprNil"
LISTSXP    = "SExprList"
-- END add for Lisp

IFOP       = "IfOp" 
WHILEOP    = "WhileOp" 
SETOP      = "SetOp" 
BEGINOP    = "BeginOp" 
APPLYFUN   = "ApplyFun"
APPLYOP    = "ApplyOp"

ADDOP      = "+"
SUBOP      = "-"
MULOP      = "*"
DIVOP      = "/"
EQOP       = "="
LTOP       = "<"
GTOP       = ">"
PRINTOP    = "print"
-- BEGIN add for Lisp
CONSOP     = "cons"
CAROP      = "car"
CDROP      = "cdr"
NUMBERPOP  = "number?"
SYMBOLPOP  = "symbol?"
NULLPOP    = "null?"
LISTPOP    = "list?"
-- END add for Lisp







Aug 29 19:13 2013 opcodes_lisp.lua Page 2



return {}