github.com/open-simh.simtools
1
0
Fork 0
mirror of https://github.com/open-simh/simtools.git synced 2026-01-18 00:53:31 +00:00
Code Issues Projects Releases Wiki Activity

Here is another.

Browse Source
This commit is contained in:
Olaf Seibert 2021-01-23 17:21:49 +01:00
parent af0cf5f7bc
commit 40b41c3087
2 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
assemble.c
View File

@ -1407,7 +1407,7 @@ static int assemble(
mode_extension(tr, &left, stack->top);
mode_extension(tr, &right, stack->top);
}
return 1;
return CHECK_EOL;
case OC_BR:
/* branches */ {
@ -1467,7 +1467,7 @@ static int assemble(
free_tree(value);
}
return 1;
return CHECK_EOL;
case OC_SOB:
{
@ -1531,7 +1531,7 @@ static int assemble(
free_tree(value);
}
return 1;
return CHECK_EOL;
case OC_ASH:
/* First op is gen, second is register. */ {
@ -1568,7 +1568,7 @@ static int assemble(
mode_extension(tr, &mode, stack->top);
free_tree(value);
}
return 1;
return CHECK_EOL;
case OC_JSR:
/* For JSR and XOR, first op is register, second is gen. */ {
@ -1609,7 +1609,7 @@ static int assemble(
mode_extension(tr, &mode, stack->top);
free_tree(value);
}
return 1;
return CHECK_EOL;
case OC_1REG:
/* One register (RTS) */ {
@ -1628,7 +1628,7 @@ static int assemble(
store_word(stack->top, tr, 2, op->value | reg);
free_tree(value);
}
return 1;
return CHECK_EOL;
#if 0
/*
@ -1652,7 +1652,7 @@ static int assemble(
store_word(stack->top, tr, 2, word);
mode_extension(tr, &mode, stack->top);
}
return 1;
return CHECK_EOL;
#endif
case OC_FPPGENAC:
@ -1693,7 +1693,7 @@ static int assemble(
mode_extension(tr, &mode, stack->top);
free_tree(value);
}
return 1;
return CHECK_EOL;
case OC_FPPACGEN:
/* One reg 0-3 and one gen */ {
@ -1737,7 +1737,7 @@ static int assemble(
mode_extension(tr, &mode, stack->top);
free_tree(value);
}
return 1;
return CHECK_EOL;
default:
report(stack->top, "Unimplemented instruction format\n");

1
tests/test-float.lst.ok
View File

@ -147,6 +147,7 @@ test-float.mac:123: ***ERROR Junk at end of line ('5')
123 000424 170627 000002 absf #2.5 ; bad: operand is destination
test-float.mac:124: ***ERROR Junk at end of line ('5')
124 000430 170527 000002 tstd #2.5 ; bad: operand is considered FDST by the arch handbook
test-float.mac:125: ***ERROR Junk at end of line ('5')
125 000434 174027 000002 stf ac0,#2.5 ; bad: junk at end of line
126 000440 174027 000002 stf ac0,#2 ; doesn't makes sense but MACRO11 allows it
127