new copyright; att/bsd/shared

[unix-history] / usr / src / usr.bin / pascal / src / nl.c

diff --git a/usr/src/usr.bin/pascal/src/nl.c b/usr/src/usr.bin/pascal/src/nl.c
index a1448b7..c1b72c9 100644 (file)
--- a/usr/src/usr.bin/pascal/src/nl.c
+++ b/usr/src/usr.bin/pascal/src/nl.c
@@ -1,8 +1,13 @@
-/* Copyright (c) 1979 Regents of the University of California */
+/*-
+ * Copyright (c) 1980 The Regents of the University of California.
+ * All rights reserved.
+ *
+ * %sccs.include.redist.c%
+ */

 
 #ifndef lint
 
 #ifndef lint

-static char sccsid[] = "@(#)nl.c 1.15 %G%";
-#endif
+static char sccsid[] = "@(#)nl.c       5.2 (Berkeley) %G%";
+#endif /* not lint */

 
 #include "whoami.h"
 #include "0.h"
 
 #include "whoami.h"
 #include "0.h"


@@ -779,16 +784,12 @@ nlcopy(p)
        struct nl *p;
 {
        register struct nl *p1, *p2;
        struct nl *p;
 {
        register struct nl *p1, *p2;

-       register int i;

 
        p1 = p;
 
        p1 = p;

-       p = p2 = defnl((char *) 0, 0, NLNIL, 0);
-       i = (sizeof *p)/(sizeof (int));
-       do
-               *p2++ = *p1++;
-       while (--i);
-       p->chain = NIL;
-       return (p);
+       p2 = defnl((char *) 0, 0, NLNIL, 0);
+       *p2 = *p1;
+       p2->chain = NLNIL;
+       return (p2);

 }
 
 /*
 }
 
 /*