new copyright; att/bsd/shared

[unix-history] / usr / src / usr.bin / f77 / libF77 / random_.c

diff --git a/usr/src/usr.bin/f77/libF77/random_.c b/usr/src/usr.bin/f77/libF77/random_.c
index cf8ef56..794469f 100644 (file)
--- a/usr/src/usr.bin/f77/libF77/random_.c
+++ b/usr/src/usr.bin/f77/libF77/random_.c
@@ -1,10 +1,15 @@
-/*
- * Copyright (c) 1980 Regents of the University of California.
- * All rights reserved.  The Berkeley software License Agreement
- * specifies the terms and conditions for redistribution.
+/*-
+ * Copyright (c) 1980 The Regents of the University of California.
+ * All rights reserved.

  *
  *

- *     @(#)random_.c   5.2     %G%
- * 
+ * %sccs.include.proprietary.c%
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)random_.c  5.5 (Berkeley) %G%";
+#endif /* not lint */
+
+/* 

  * Routines to return random values
  *
  * calling sequence:
  * Routines to return random values
  *
  * calling sequence:


@@ -19,11 +24,11 @@
  *     Real values will range from 0.0 thru 1.0 .
  */
 
  *     Real values will range from 0.0 thru 1.0 .
  */
 

-#if    vax
+#if    defined(vax) || defined(tahoe) || defined(hp300)

 #define        RANDMAX         2147483647
 #define        RANDMAX         2147483647

-#else  vax
+#else  vax || tahoe

        UNKNOWN MACHINE!
        UNKNOWN MACHINE!

-#endif vax
+#endif vax || tahoe

 
 long irandm_(iarg)
 long *iarg;
 
 long irandm_(iarg)
 long *iarg;