47 lines
1.2 KiB
C++
47 lines
1.2 KiB
C++
/** @file VsmInstr.cpp
|
|
*
|
|
* @author Roland Conybeare, Feb 2026
|
|
**/
|
|
|
|
#include "VsmInstr.hpp"
|
|
|
|
namespace xo {
|
|
namespace scm {
|
|
const char *
|
|
vsm_opcode_descr(vsm_opcode x)
|
|
{
|
|
switch (x) {
|
|
case vsm_opcode::halt: return "halt";
|
|
case vsm_opcode::eval: return "eval";
|
|
case vsm_opcode::apply: return "apply";
|
|
case vsm_opcode::evalargs: return "evalargs";
|
|
case vsm_opcode::apply_cont: return "apply_cont";
|
|
case vsm_opcode::seq_cont: return "seq_cont";
|
|
case vsm_opcode::N:
|
|
break;
|
|
}
|
|
|
|
return "opcode?";
|
|
}
|
|
|
|
VsmInstr
|
|
VsmInstr::c_halt = VsmInstr(vsm_opcode::halt);
|
|
|
|
VsmInstr
|
|
VsmInstr::c_eval = VsmInstr(vsm_opcode::eval);
|
|
|
|
VsmInstr
|
|
VsmInstr::c_apply = VsmInstr(vsm_opcode::apply);
|
|
|
|
VsmInstr
|
|
VsmInstr::c_evalargs = VsmInstr(vsm_opcode::evalargs);
|
|
|
|
VsmInstr
|
|
VsmInstr::c_apply_cont = VsmInstr(vsm_opcode::apply_cont);
|
|
|
|
VsmInstr
|
|
VsmInstr::c_seq_cont = VsmInstr(vsm_opcode::seq_cont);
|
|
} /*namespace scm*/
|
|
} /*namespace xo*/
|
|
|
|
/* end VsmInstr.cpp */
|