X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=csrc%2Fpf_inner.c;fp=csrc%2Fpf_inner.c;h=3e0c040d6eaf2ca0f197d34dbb185c5ec9a8b5b2;hb=a6a68cf9a279a6217daa1f5bd089309622bb3f34;hp=b7c8ae156af3dd213c4af109b86dc4020e580cde;hpb=516c3194c86ca4c14bb9ccc37efb5176f6a8a20c;p=debian%2Fpforth

diff --git a/csrc/pf_inner.c b/csrc/pf_inner.c
index b7c8ae1..3e0c040 100644
--- a/csrc/pf_inner.c
+++ b/csrc/pf_inner.c
@@ -1763,6 +1763,7 @@ DBUG(("XX ah,m,l = 0x%8x,%8x,%8x - qh,l = 0x%8x,%8x\n", ah,am,al, qh,ql ));
             {
                 ERR("' could not find ");
                 ioType( (char *) CharPtr+1, *CharPtr );
+                EMIT_CR;
                 M_THROW(-13);
             }
             else