1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
////#define XERR
//#include "parser.ih"
//
//SemVal Parser::listConst(Args &args)
//{
// return args.builtin(Builtin::LISTCONST);
//
//
// SemVal list{ e_const | e_list }; // the result
//
// for (auto &semVal: args) // ensure that all args are string
// {
// if (semVal.type() & e_str)
// {
// semVal.push(); // all arguments must be strigns
// list << semVal; // add code to list
// continue;
// }
//
// Error::msg(Error::LIST_CONST);
// return list;
// }
//
// list << Opcode::push_imm << as<short>(args.size());
// list.callBuiltin(Builtin::LISTCONST, args.size() + 1);
//
// return
// return list;
//}
|
