diff --git a/lang/pc/libpc/opn.c b/lang/pc/libpc/opn.c index e28e3edb9..83f9d91ec 100644 --- a/lang/pc/libpc/opn.c +++ b/lang/pc/libpc/opn.c @@ -87,10 +87,10 @@ static int initfl(descr,sz,f) int descr; int sz; struct file *f; { f->fname = _pargv[i]; _cls(f); if ((descr & WRBIT) == 0) { - if ((f->ufd = _open(f->fname,0)) < 0) + if ((f->ufd = open(f->fname,0)) < 0) _trp(ERESET); } else { - if ((f->ufd = _creat(f->fname,0644)) < 0) + if ((f->ufd = creat(f->fname,0644)) < 0) _trp(EREWR); } } diff --git a/lang/pc/libpc/pcreat.c b/lang/pc/libpc/pcreat.c index b9c565f68..103362491 100644 --- a/lang/pc/libpc/pcreat.c +++ b/lang/pc/libpc/pcreat.c @@ -18,12 +18,12 @@ /* Author: J.W. Stevenson */ +#include #include #include extern _cls(); extern _trp(); -extern int _creat(); /* procedure pcreat(var f:text; s:string); */ @@ -36,6 +36,6 @@ pcreat(f,s) struct file *f; char *s; { f->size = 1; f->count = PC_BUFLEN; f->buflen = PC_BUFLEN; - if ((f->ufd = _creat(s,0644)) < 0) + if ((f->ufd = creat(s,0644)) < 0) _trp(EREWR); }