Fix cell increment error in RESIZE

[debian/pforth] / csrc / pf_core.c

diff --git a/csrc/pf_core.c b/csrc/pf_core.c
index 0329749eee69970fd22fced0a174c8afd59b696f..ceab2bee880ef19f637d602077b87ec1ad695be7 100644 (file)
--- a/csrc/pf_core.c
+++ b/csrc/pf_core.c
@@ -444,7 +444,6 @@ int32 pfDoForth( const char *DicName, const char *SourceName, int32 IfInit )
 \r
        pfInit();\r
        \r
-       \r
 /* Allocate Task structure. */\r
        pfDebugMessage("pfDoForth: call pfCreateTask()\n");\r
        cftd = pfCreateTask( DEFAULT_USER_DEPTH, DEFAULT_RETURN_DEPTH );\r