Deleted Added
sdiff udiff text old ( 42807 ) new ( 43078 )
full compact
softcore.awk (42807) softcore.awk (43078)
1#!/usr/bin/awk -f
2# Convert forth source files to a giant C string
3# Joe Abley <jabley@patho.gen.nz>, 12 January 1999
4
5BEGIN \
6{
7 printf "/***************************************************************\n";
8 printf "** s o f t c o r e . c\n";

--- 77 unchanged lines hidden (view full) ---

86}
87
88END \
89{
90 if (commenting) end_comments();
91 printf " \"quit \";\n";
92 printf "\n\nvoid ficlCompileSoftCore(FICL_VM *pVM)\n";
93 printf "{\n";
1#!/usr/bin/awk -f
2# Convert forth source files to a giant C string
3# Joe Abley <jabley@patho.gen.nz>, 12 January 1999
4
5BEGIN \
6{
7 printf "/***************************************************************\n";
8 printf "** s o f t c o r e . c\n";

--- 77 unchanged lines hidden (view full) ---

86}
87
88END \
89{
90 if (commenting) end_comments();
91 printf " \"quit \";\n";
92 printf "\n\nvoid ficlCompileSoftCore(FICL_VM *pVM)\n";
93 printf "{\n";
94 printf " assert(ficlExec(pVM, softWords) != VM_ERREXIT);\n";
94 printf " assert(ficlExec(pVM, softWords, -1) != VM_ERREXIT);\n";
95 printf "}\n";
96}
95 printf "}\n";
96}