ensure that we are in compiling mode in ;
This commit is contained in:
parent
2296a83b9b
commit
d188cb033d
1 changed files with 4 additions and 0 deletions
4
pila.c
4
pila.c
|
@ -374,6 +374,10 @@ compile_anon_start_nat(RpnState *st)
|
||||||
void
|
void
|
||||||
compile_end_nat(RpnState *st)
|
compile_end_nat(RpnState *st)
|
||||||
{
|
{
|
||||||
|
if (!st->compiling) {
|
||||||
|
signal_error(st, "not in compiling mode");
|
||||||
|
return;
|
||||||
|
}
|
||||||
Word *w = malloc(sizeof(*w));
|
Word *w = malloc(sizeof(*w));
|
||||||
|
|
||||||
st->compiling = false;
|
st->compiling = false;
|
||||||
|
|
Loading…
Add table
Reference in a new issue