vitalif
/
lime
mirror of https://github.com/vitalif/lime
1
0
Fork 0
Code Issues Releases Wiki Activity

Example stil needed some extra showing off

master
Richard van Velzen 2011-12-29 14:22:03 +01:00
parent 41598e9840
commit cd0fcae035
2 changed files with 22 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
examples/calc.class
View File

@ -260,7 +260,7 @@ class calc extends lime_parser {
function reduce_0_stmt_1($tokens, &$result) { function reduce_0_stmt_1($tokens, &$result) {
// (0) stmt := exp // (0) stmt := exp
$result = reset($tokens); $result = reset($tokens);
echo " -> "; echo $tokens[0]; echo "\n"; echo " -> "; echo $tokens[0][0] . ' = ' . $tokens[0][1]; echo "\n";
} }
function reduce_1_stmt_2($tokens, &$result) { function reduce_1_stmt_2($tokens, &$result) {
@ -276,60 +276,61 @@ class calc extends lime_parser {
function reduce_2_exp_1($tokens, &$result) { function reduce_2_exp_1($tokens, &$result) {
// (2) exp := num // (2) exp := num
$result = reset($tokens); $result = reset($tokens);
$result = array($tokens[0], $tokens[0]);
} }
function reduce_3_exp_2($tokens, &$result) { function reduce_3_exp_2($tokens, &$result) {
// (3) exp := var // (3) exp := var
$result = reset($tokens); $result = reset($tokens);
$result = get_variable($tokens[0]); $result = array($tokens[0], get_variable($tokens[0]));
} }
function reduce_4_exp_3($tokens, &$result) { function reduce_4_exp_3($tokens, &$result) {
// (4) exp := exp '+' exp // (4) exp := exp '+' exp
$result = reset($tokens); $result = reset($tokens);
$result = '(' . $tokens[0] . ' + ' . $tokens[2] . ')'; $result = array('(' . $tokens[0][0] . ' + ' . $tokens[2][0] . ')', $tokens[0][1] + $tokens[2][1]);
} }
function reduce_5_exp_4($tokens, &$result) { function reduce_5_exp_4($tokens, &$result) {
// (5) exp := exp '-' exp // (5) exp := exp '-' exp
$result = reset($tokens); $result = reset($tokens);
$result = '(' . $tokens[0] . ' - ' . $tokens[2] . ')'; $result = array('(' . $tokens[0][0] . ' - ' . $tokens[2][0] . ')', $tokens[0][1] - $tokens[2][1]);
} }
function reduce_6_exp_5($tokens, &$result) { function reduce_6_exp_5($tokens, &$result) {
// (6) exp := exp '*' exp // (6) exp := exp '*' exp
$result = reset($tokens); $result = reset($tokens);
$result = '(' . $tokens[0] . ' * ' . $tokens[2] . ')'; $result = array('(' . $tokens[0][0] . ' * ' . $tokens[2][0] . ')', $tokens[0][1] * $tokens[2][1]);
} }
function reduce_7_exp_6($tokens, &$result) { function reduce_7_exp_6($tokens, &$result) {
// (7) exp := exp '/' exp // (7) exp := exp '/' exp
$result = reset($tokens); $result = reset($tokens);
$result = '(' . $tokens[0] . ' / ' . $tokens[2] . ')'; $result = array('(' . $tokens[0][0] . ' / ' . $tokens[2][0] . ')', $tokens[0][1] / $tokens[2][1]);
} }
function reduce_8_exp_7($tokens, &$result) { function reduce_8_exp_7($tokens, &$result) {
// (8) exp := exp '^' exp // (8) exp := exp '^' exp
$result = reset($tokens); $result = reset($tokens);
$result = '(' . $tokens[0] . ' ^ ' . $tokens[2] . ')'; $result = array('(' . $tokens[0][0] . ' ^ ' . $tokens[2][0] . ')', pow($tokens[0][1], $tokens[2][1]));
} }
function reduce_9_exp_8($tokens, &$result) { function reduce_9_exp_8($tokens, &$result) {
// (9) exp := exp '%' exp // (9) exp := exp '%' exp
$result = reset($tokens); $result = reset($tokens);
$result = '(' . $tokens[0] . ' % ' . $tokens[2] . ')'; $result = array('(' . $tokens[0][0] . ' % ' . $tokens[2][0] . ')', $tokens[0][1] % $tokens[2][1]);
} }
function reduce_10_exp_9($tokens, &$result) { function reduce_10_exp_9($tokens, &$result) {
// (10) exp := '+' exp // (10) exp := '+' exp
$result = reset($tokens); $result = reset($tokens);
$result = '(+ ' . $tokens[1] . ')'; $result = array('(+ ' . $tokens[1][0] . ')', +($tokens[1][1]));
} }
function reduce_11_exp_10($tokens, &$result) { function reduce_11_exp_10($tokens, &$result) {
// (11) exp := '-' exp // (11) exp := '-' exp
$result = reset($tokens); $result = reset($tokens);
$result = '(- ' . $tokens[1] . ')'; $result = array('(- ' . $tokens[1][0] . ')', -($tokens[1][1]));
} }
function reduce_12_exp_11($tokens, &$result) { function reduce_12_exp_11($tokens, &$result) {

22
examples/calc.lime
View File

@ -6,7 +6,7 @@
%right '^' %right '^'
%right T_INC %right T_INC
stmt = exp { echo " -> "; echo $1; echo "\n"; } stmt = exp { echo " -> "; echo $1[0] . ' = ' . $1[1]; echo "\n"; }
| var/v '=' exp/e { | var/v '=' exp/e {
echo "$v = $e\n"; echo "$v = $e\n";
set_variable($v, $e); set_variable($v, $e);
@ -14,15 +14,15 @@ stmt = exp { echo " -> "; echo $1; echo "\n"; }
. .
exp = num exp = num { $$ = array($1, $1); }
| var { $$ = get_variable($1); } | var { $$ = array($1, get_variable($1)); }
| exp '+' exp { $$ = '(' . $1 . ' + ' . $3 . ')'; } | exp '+' exp { $$ = array('(' . $1[0] . ' + ' . $3[0] . ')', $1[1] + $3[1]); }
| exp '-' exp { $$ = '(' . $1 . ' - ' . $3 . ')'; } | exp '-' exp { $$ = array('(' . $1[0] . ' - ' . $3[0] . ')', $1[1] - $3[1]); }
| exp '*' exp { $$ = '(' . $1 . ' * ' . $3 . ')'; } | exp '*' exp { $$ = array('(' . $1[0] . ' * ' . $3[0] . ')', $1[1] * $3[1]); }
| exp '/' exp { $$ = '(' . $1 . ' / ' . $3 . ')'; } | exp '/' exp { $$ = array('(' . $1[0] . ' / ' . $3[0] . ')', $1[1] / $3[1]); }
| exp '^' exp { $$ = '(' . $1 . ' ^ ' . $3 . ')'; } | exp '^' exp { $$ = array('(' . $1[0] . ' ^ ' . $3[0] . ')', pow($1[1], $3[1])); }
| exp '%' exp { $$ = '(' . $1 . ' % ' . $3 . ')'; } | exp '%' exp { $$ = array('(' . $1[0] . ' % ' . $3[0] . ')', $1[1] % $3[1]); }
| '+' exp %prec T_INC { $$ = '(+ ' . $2 . ')'; } | '+' exp %prec T_INC { $$ = array('(+ ' . $2[0] . ')', +($2[1])); }
| '-' exp %prec T_INC { $$ = '(- ' . $2 . ')'; } | '-' exp %prec T_INC { $$ = array('(- ' . $2[0] . ')', -($2[1])); }
| '(' exp/$ ')' | '(' exp/$ ')'
. .