void
operator<< (::xercesc::DOMElement& e, const Navigation& i)
{
e << static_cast< const ::xml_schema::Type& > (i);
// event
//
{
::xsd::cxx::tree::type_serializer_map< char >& tsm (
::xsd::cxx::tree::type_serializer_map_instance< 0, char > ());
for (Navigation::EventConstIterator
b (i.event ().begin ()), n (i.event ().end ());
b != n; ++b)
{
if (typeid (Navigation::EventType) == typeid (*b))
{
::xercesc::DOMElement& s (
::xsd::cxx::xml::dom::create_element (
"event",
"artofsequence.org/aosl/1.0",
e));
s << *b;
}
else
tsm.serialize (
"event",
"artofsequence.org/aosl/1.0",
true, true, e, *b);
}
}
}
void do_op(char C)
{
switch(C)
{
case '0':
case '1':
case '2':
case '3':
case '4':
case '5':
case '6':
case '7':
case '8':
case '9': push(C-'0'); break;
case '+': addition(); break;
case '-': subtraction(); break;
case '*': multiplication(); break;
case '/': division(); break;
case '%': modulo(); break;
case '^': north(); break;
case '>': east(); break;
case 'V':
case 'v': south(); break;
case '<': west(); break;
case '?': spin(); break;
case '!': lnot(); break;
case '`': gt(); break;
case '_': hif(); break;
case '|': vif(); break;
case '"': tsm(); break;
case ':': dup(); break;
case '\\': swap(); break;
case '$': chomp(); break;
case '#': jump(); break;
case 'p': put(); break;
case 'g': get(); break;
case 'H': gate(); break;
case '.': print_i(); break;
case ',': print_c(); break;
case '&': input_i(); break;
case '~': input_c(); break;
case '@': hacf(); break;
case '{': left_b(); break;
case '}': right_b(); break;
case '[': carry_l(); break;
case ']': carry_r(); break;
case ';': empty(); break;
case 'O': portal_o(); break;
case 'B': portal_b(); break;
default: /* DO NOTHING! */ break;
}
}
