Mercurial > hg-old > index.cgi
comparison lwasm/lwasm.c @ 337:04c80c51b16a
Checkpoint development
author | lost |
---|---|
date | Fri, 12 Mar 2010 06:01:38 +0000 |
parents | |
children | 0215a0fbf61b |
comparison
equal
deleted
inserted
replaced
336:401587ab6a09 | 337:04c80c51b16a |
---|---|
1 /* | |
2 lwasm.c | |
3 | |
4 Copyright © 2010 William Astle | |
5 | |
6 This file is part of LWTOOLS. | |
7 | |
8 LWTOOLS is free software: you can redistribute it and/or modify it under the | |
9 terms of the GNU General Public License as published by the Free Software | |
10 Foundation, either version 3 of the License, or (at your option) any later | |
11 version. | |
12 | |
13 This program is distributed in the hope that it will be useful, but WITHOUT | |
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for | |
16 more details. | |
17 | |
18 You should have received a copy of the GNU General Public License along with | |
19 this program. If not, see <http://www.gnu.org/licenses/>. | |
20 */ | |
21 | |
22 #include <config.h> | |
23 | |
24 #include <lw_expr.h> | |
25 | |
26 #include "lwasm.h" | |
27 | |
28 #define NULL 0; | |
29 | |
30 lw_expr_t lwasm_evaluate_var(char *var) | |
31 { | |
32 return NULL; | |
33 } | |
34 | |
35 lw_expr_t lwasm_evaluate_special(int t, void *ptr) | |
36 { | |
37 switch (t) | |
38 { | |
39 case lwasm_expr_linelen: | |
40 { | |
41 line_t *cl = ptr; | |
42 if (cl -> len == -1) | |
43 return NULL; | |
44 return lw_expr_build(lw_expr_type_int, cl -> len); | |
45 } | |
46 break; | |
47 } | |
48 return NULL; | |
49 } |