Mercurial > hg-old > index.cgi

annotate lwasm/insn_logicmem.c @ 208:06effa2faea1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added some info on building gcc6809 to use lwtools
author lost
date Tue, 21 Apr 2009 02:57:37 +0000
parents 427e268e876b
children bae1e3ecdce1
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
34
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
1 /*
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
2 insn_logicmem.c
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
3 Copyright © 2009 William Astle
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
4
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
5 This file is part of LWASM.
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
6
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
7 LWASM is free software: you can redistribute it and/or modify it under the
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
8 terms of the GNU General Public License as published by the Free Software
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
9 Foundation, either version 3 of the License, or (at your option) any later
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
10 version.
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
11
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
12 This program is distributed in the hope that it will be useful, but WITHOUT
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
15 more details.
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
16
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
17 You should have received a copy of the GNU General Public License along with
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
18 this program. If not, see <http://www.gnu.org/licenses/>.
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
19
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
20 Contains code for handling logic/mem instructions
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
21 */
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
22
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
23 #include <ctype.h>
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
24 #include <stdio.h>
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
25 #include <string.h>
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
26
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
27 #include "lwasm.h"
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
28 #include "instab.h"
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
29 #include "expr.h"
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
30
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
31 extern void insn_gen_aux(asmstate_t *as, lwasm_line_t *l, char **optr, int opnum, int extra);
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
32
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
33 // for aim, oim, eim, tim
80
8929e1ee99cf Checkpointing deployment of non-constant expression handling
lost
parents: 37
diff changeset
34 // the immediate operand must be constant on pass 2
34
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
35 OPFUNC(insn_logicmem)
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
36 {
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
37 int rval, v1;
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
38 const char *p2;
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
39 lwasm_expr_stack_t *s;
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
40
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
41 if (**p == '#')
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
42 (*p)++;
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
43
80
8929e1ee99cf Checkpointing deployment of non-constant expression handling
lost
parents: 37
diff changeset
44 rval = lwasm_expr_result2(as, l, p, 0, &v1, 1);
8929e1ee99cf Checkpointing deployment of non-constant expression handling
lost
parents: 37
diff changeset
45 if (rval != 0)
8929e1ee99cf Checkpointing deployment of non-constant expression handling
lost
parents: 37
diff changeset
46 v1 = 0;
8929e1ee99cf Checkpointing deployment of non-constant expression handling
lost
parents: 37
diff changeset
47 if (rval == 1 && as -> passnum == 2)
8929e1ee99cf Checkpointing deployment of non-constant expression handling
lost
parents: 37
diff changeset
48 register_error(as, l, 2, "Illegal external or intersegment reference");
34
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
49
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
50 if (v1 < -128 || v1 > 255)
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
51 register_error(as, l, 2, "Byte overflow");
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
52
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
53 if (**p != ',' && **p != ';')
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
54 {
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
55 register_error(as, l, 1, "Bad operand");
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
56 return;
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
57 }
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
58
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
59 (*p)++;
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
60
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
61 // now we have a general addressing mode - call for it
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
62 insn_gen_aux(as, l, p, opnum, v1 & 0xff);
b29eec6f3819 Finished adding addressing mode handlers
lost
parents:
diff changeset
63 }