Change 32 to BL.
pf_text.c pf_words.c pfcompil.c pfcustom.c
PFSOURCE = $(PFBASESOURCE) $(IO_SOURCE)
-VPATH = .:../../csrc:../../csrc/posix:../../csrc/stdio
-VPATH = .:$(SRCDIR)/csrc:$(SRCDIR)/csrc/posix:$(SRCDIR)/csrc/stdio
+VPATH = .:$(SRCDIR)/csrc:$(SRCDIR)/csrc/posix:$(SRCDIR)/csrc/stdio:$(SRCDIR)/csrc/win32_console:$(SRCDIR)/csrc/win32
XCFLAGS = $(CCOPTS)
XCPPFLAGS = $(CDEFS) -I.
\r
#include "pf_all.h"\r
\r
-#ifdef WIN32\r
+#if defined(WIN32) && !defined(__MINGW32__)\r
#include <crtdbg.h>\r
#endif\r
\r
typedef long Err;\r
#endif\r
\r
-typedef cell_t *dicptr;\r
-\r
typedef char ForthString;\r
typedef char *ForthStringPtr;\r
\r
\r
: FIND.BODY ( -- , pfa true | $name false , look for word in dict. )\r
\ Return address of parameter data.\r
- 32 word find\r
+ bl word find\r
IF >body true\r
ELSE false\r
THEN\r
\r
: $ ( <number> -- N , convert next number as hex )\r
base @ hex\r
- 32 lword number? num_type_single = not\r
+ bl lword number? num_type_single = not\r
abort" Not a single number!"\r
swap base !\r
state @\r
\r
Documentation for pForth at http://www.softsynth.com/pforth/\r
\r
-V27\r
+V28 - unreleased\r
+ - fixes for MinGW build\r
+\r
+V27 - 11/22/2010\r
- Fixed REPOSITION-FILE FILE-SIZE and FILE-POSITION.\r
They used to use single precision offset. Now use double as specified.\r
- Delete object directories in Makefile clean.\r