Add support for WATCOMC
[pforth] / csrc / pf_core.c
index f7bf38f..235c0a2 100644 (file)
@@ -572,3 +572,13 @@ error1:
 \r
        return -1;\r
 }\r
 \r
        return -1;\r
 }\r
+\r
+\r
+#ifdef PF_UNIT_TEST\r
+cell_t pfUnitTest( void )\r
+{\r
+       cell_t numErrors = 0;\r
+       numErrors += pfUnitTestText();\r
+       return numErrors;\r
+}\r
+#endif\r