projects
/
unix-history
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
tags
|
clone url
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
update from John Gilmore for gcc
[unix-history]
/
usr
/
src
/
usr.bin
/
pascal
/
libpc
/
NIL.c
diff --git
a/usr/src/usr.bin/pascal/libpc/NIL.c
b/usr/src/usr.bin/pascal/libpc/NIL.c
index
3624050
..
3f82faa
100644
(file)
--- a/
usr/src/usr.bin/pascal/libpc/NIL.c
+++ b/
usr/src/usr.bin/pascal/libpc/NIL.c
@@
-1,18
+1,17
@@
/* Copyright (c) 1979 Regents of the University of California */
/* Copyright (c) 1979 Regents of the University of California */
-static char sccsid[] = "@(#)NIL.c 1.
1
%G%";
+static char sccsid[] = "@(#)NIL.c 1.
4
%G%";
#include "h00vars.h"
#include "h00vars.h"
-#include "h01errs.h"
+
+char ENIL[] = "Pointer value out of legal range\n";
char *
NIL(ptr)
char *
NIL(ptr)
-
char *ptr; /* pointer to struct */
{
if (ptr > _maxptr || ptr < _minptr) {
char *ptr; /* pointer to struct */
{
if (ptr > _maxptr || ptr < _minptr) {
- ERROR(ENILPTR, 0);
- return;
+ ERROR(ENIL, 0);
}
return ptr;
}
}
return ptr;
}