port to tahoe by Nir peleg of CCI

[unix-history] / usr / src / usr.bin / pascal / pdx / process / pstatus.c

diff --git a/usr/src/usr.bin/pascal/pdx/process/pstatus.c b/usr/src/usr.bin/pascal/pdx/process/pstatus.c
index d94d8c3..05f19a5 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/process/pstatus.c
+++ b/usr/src/usr.bin/pascal/pdx/process/pstatus.c
@@ -1,7 +1,12 @@
-/* Copyright (c) 1982 Regents of the University of California */
-
-static char sccsid[] = "@(#)pstatus.c 1.3 %G%";
+/*
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved.  The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ */

 
 

+#ifndef lint
+static char sccsid[] = "@(#)pstatus.c  5.2 (Berkeley) %G%";
+#endif not lint

 /*
  * process status routines
  */
 /*
  * process status routines
  */


@@ -65,11 +70,7 @@ char *filename;
            printf(" in file %s", filename);
        }
     } else {
            printf(" in file %s", filename);
        }
     } else {

-#      if (isvaxpx)

            printf("location %d\n", pc);
            printf("location %d\n", pc);

-#      else
-           printf("location 0x%x\n", pc);
-#      endif

     }
 }
 
     }
 }