Differences From Artifact [a63938dc88b0c424]:
- File
polemy/eval.d
- 2010-11-13 04:32:12 - part of checkin [8474ae68d9] on branch trunk - rising mechanism (user: kinaba) [annotate]
To Artifact [232a7f3469a1ed88]:
- File
polemy/eval.d
- 2010-11-13 04:58:01 - part of checkin [3a2762fca5] on branch trunk - _isXXX (user: kinaba) [annotate]
68 throw genex!RuntimeException(pos, "if takes three argume 68 throw genex!RuntimeException(pos, "if takes three argume
69 if( auto x = cast(IntValue)args[0] ) 69 if( auto x = cast(IntValue)args[0] )
70 if( auto ft = cast(FunValue)args[1] ) 70 if( auto ft = cast(FunValue)args[1] )
71 if( auto fe = cast(FunValue)args[2] ) 71 if( auto fe = cast(FunValue)args[2] )
72 return (x.data == 0 ? fe : ft).call(pos,lay,[]); 72 return (x.data == 0 ? fe : ft).call(pos,lay,[]);
73 throw genex!RuntimeException(pos, "type mismatch in if"); 73 throw genex!RuntimeException(pos, "type mismatch in if");
74 })); 74 }));
> 75 ctx.set("_isint", "@v", native( (Value v){return new IntValue(BigInt(cas
> 76 ctx.set("_isstr", "@v", native( (Value v){return new IntValue(BigInt(cas
> 77 ctx.set("_isfun", "@v", native( (Value v){return new IntValue(BigInt(cas
75 return ctx; 78 return ctx;
76 } 79 }
77 80
78 /// Entry point of this module 81 /// Entry point of this module
79 82
80 Tuple!(Value,"val",Table,"ctx") evalString(S,T...)(S str, T fn_ln_cn) 83 Tuple!(Value,"val",Table,"ctx") evalString(S,T...)(S str, T fn_ln_cn)
81 { 84 {