Mercurial > hg-old > index.cgi
diff lwasm/lwasm.c @ 337:04c80c51b16a
Checkpoint development
author | lost |
---|---|
date | Fri, 12 Mar 2010 06:01:38 +0000 |
parents | |
children | 0215a0fbf61b |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/lwasm/lwasm.c Fri Mar 12 06:01:38 2010 +0000 @@ -0,0 +1,49 @@ +/* +lwasm.c + +Copyright © 2010 William Astle + +This file is part of LWTOOLS. + +LWTOOLS is free software: you can redistribute it and/or modify it under the +terms of the GNU General Public License as published by the Free Software +Foundation, either version 3 of the License, or (at your option) any later +version. + +This program is distributed in the hope that it will be useful, but WITHOUT +ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for +more details. + +You should have received a copy of the GNU General Public License along with +this program. If not, see <http://www.gnu.org/licenses/>. +*/ + +#include <config.h> + +#include <lw_expr.h> + +#include "lwasm.h" + +#define NULL 0; + +lw_expr_t lwasm_evaluate_var(char *var) +{ + return NULL; +} + +lw_expr_t lwasm_evaluate_special(int t, void *ptr) +{ + switch (t) + { + case lwasm_expr_linelen: + { + line_t *cl = ptr; + if (cl -> len == -1) + return NULL; + return lw_expr_build(lw_expr_type_int, cl -> len); + } + break; + } + return NULL; +}