X-Git-Url: https://git.gag.com/?a=blobdiff_plain;ds=sidebyside;f=csrc%2Fpf_core.c;fp=csrc%2Fpf_core.c;h=ceab2bee880ef19f637d602077b87ec1ad695be7;hb=07618dcb5a69971dde69b56cfda977d92de48525;hp=0329749eee69970fd22fced0a174c8afd59b696f;hpb=246a0927c7452a30d78314ebe920c06fbf9fd4b8;p=debian%2Fpforth diff --git a/csrc/pf_core.c b/csrc/pf_core.c index 0329749..ceab2be 100644 --- a/csrc/pf_core.c +++ b/csrc/pf_core.c @@ -444,7 +444,6 @@ int32 pfDoForth( const char *DicName, const char *SourceName, int32 IfInit ) pfInit(); - /* Allocate Task structure. */ pfDebugMessage("pfDoForth: call pfCreateTask()\n"); cftd = pfCreateTask( DEFAULT_USER_DEPTH, DEFAULT_RETURN_DEPTH );