Adapted for new Pascal Compiler

This commit is contained in:
ceriel
1989-05-03 09:53:25 +00:00
parent 49ca2cbb8b
commit 89539fa451
19 changed files with 191 additions and 74 deletions

10
lang/pc/libpc/nfa.c Normal file
View File

@@ -0,0 +1,10 @@
/* Author: Hans van Eck */
#include <pc_err.h>
extern trp();
_nfa(bool)
{
if (! bool) _trp(EFUNASS);
}