projects
/
YACASL2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'cmd-casl' into casl2-cmd
[YACASL2.git]
/
src
/
assemble.c
diff --git
a/src/assemble.c
b/src/assemble.c
index
811f670
..
7966ea9
100644
(file)
--- a/
src/assemble.c
+++ b/
src/assemble.c
@@
-143,7
+143,7
@@
bool assemblecmd(const CMDLINE *cmdl, PASS pass)
CMDARRAY ascmd[] = {
{ START, 0, 1, "START" },
{ END, 0, 0, "END" },
CMDARRAY ascmd[] = {
{ START, 0, 1, "START" },
{ END, 0, 0, "END" },
- { DC,
0
, OPDSIZE, "DC" },
+ { DC,
1
, OPDSIZE, "DC" },
{ DS, 1, 1, "DS" },
{ 0, 0, 0, NULL }
};
{ DS, 1, 1, "DS" },
{ 0, 0, 0, NULL }
};
@@
-314,6
+314,7
@@
bool cometcmd(const CMDLINE *cmdl, PASS pass)
/* オペランド数3 */
if(cmdl->opd->opdc == 3) {
if((x = getgr(cmdl->opd->opdv[2], true)) == 0xFFFF) {
/* オペランド数3 */
if(cmdl->opd->opdc == 3) {
if((x = getgr(cmdl->opd->opdv[2], true)) == 0xFFFF) {
+ setcerr(125, cmdl->cmd); /* not GR in operand x */
return false;
}
cmd |= x;
return false;
}
cmd |= x;