Make 'fortran float sin(), cos();' work with gcc by replacing it with

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

diff --git a/usr/src/usr.bin/f77/libF77/besy1_.c b/usr/src/usr.bin/f77/libF77/besy1_.c
index 026904f..132c099 100644 (file)
--- a/usr/src/usr.bin/f77/libF77/besy1_.c
+++ b/usr/src/usr.bin/f77/libF77/besy1_.c
@@ -1,5 +1,9 @@
 /*
 /*

- *     "@(#)besy1_.c   1.1"
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved.  The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ *
+ *     @(#)besy1_.c    5.1     %G%

  */
 
 double y1();
  */
 
 double y1();