Initial import of algae.

Algae is an interpreted language for numerical analysis.  Algae
borrows ideas from languages like MATLAB, APL, and C, but it was
developed in response to a need for a free, efficient, and versatile
high-level language with large problem capability.

5 files changed, 197 insertions, 0 deletions

diff --git a/math/algae/patches/patch-aa b/math/algae/patches/patch-aa
new file mode 100644
index 00000000000..7d4774df678
--- /dev/null
+++ b/math/algae/patches/patch-aa
@@ -0,0 +1,45 @@
+$NetBSD: patch-aa,v 1.1.1.1 2002/05/04 01:10:03 jtb Exp $
+
+--- /dev/null	Tue Jan  2 02:09:36 2001
++++ fpe/netbsd1.5.c
+@@ -0,0 +1,40 @@
++#if HAVE_CONFIG_H
++#include <config.h>
++#endif
++
++#include <stdio.h>
++#include <math.h>
++#include <errno.h>
++#include <ieeefp.h>
++#include <setjmp.h>
++#include <signal.h>
++
++#if !SKIP_LOCAL_INCLUDES
++#include "exception.h"
++#include "message.h"
++#endif
++
++static void
++catch_sigfpe (int sig, int code, struct sigcontext *scp)
++{
++  fail ("Floating point exception.");
++  raise_exception ();
++}
++
++void
++enable_fpe_traps ()
++{
++  struct sigaction act;
++
++  act.sa_handler = (void (*)(int)) catch_sigfpe;
++  sigemptyset (&act.sa_mask);
++  act.sa_flags = 0;
++
++  if (sigaction (SIGFPE, &act, NULL))
++      wipeout ("Bad sigaction call.");
++
++  sigaddset (&act.sa_mask, SIGFPE);
++  sigprocmask (SIG_UNBLOCK, &act.sa_mask, NULL);
++
++  fpsetmask (FP_X_INV | FP_X_DZ | FP_X_OFL);
++}
diff --git a/math/algae/patches/patch-ab b/math/algae/patches/patch-ab
new file mode 100644
index 00000000000..755ae08e869
--- /dev/null
+++ b/math/algae/patches/patch-ab
@@ -0,0 +1,106 @@
+$NetBSD: patch-ab,v 1.1.1.1 2002/05/04 01:10:04 jtb Exp $
+
+--- configure.orig	Wed Apr 17 02:47:02 2002
++++ configure	Wed Apr 17 02:51:35 2002
+@@ -597,7 +597,7 @@
+ LIBS="$LIBS -lm"
+ f77_compile='${F77-f77} $FFLAGS -c conftest.f 1>&5 2>&5'
+ f77_make='make F77="${F77-f77}" FFLAGS="$FFLAGS" -f conftest.mak conftest.o 1>&5 2>&5'
+-c_f77_link='(${F77-f77} $FFLAGS -c conftestf.f && ${CC-cc} $CFLAGS $CPPFLAGS conftest.c conftestf.o -o conftest $LDFLAGS $LIBS) 1>&5 2>&5'
++c_f77_link='(${F77-f77} $FFLAGS -c conftestf.f && ${CC-cc} $CFLAGS $CPPFLAGS -c conftest.c && ${F77-f77} conftest.o conftestf.o -o conftest $LDFLAGS $LIBS) 1>&5 2>&5'
+ 
+ # The next two don't include LDFLAGS, because some loser f77 compilers
+ # (like on hp) do their own thing with the -L option.
+@@ -2344,24 +2344,24 @@
+ #---------------------------------------------------------------------
+ 	
+ # Check whether --with-fortran-libs or --without-fortran-libs was given.
+-if test "${with_fortran_libs+set}" = set; then
+-  withval="$with_fortran_libs"
+-  fortran_libs="${withval}"
+-else
+-  # The patterns are not necessarily exclusive, so their order is important.
+-  case "$host" in
+-	 sparc-sun-sunos4* )
+-	   fortran_libs="/usr/lang/SC1.0" ;;
+-	 sparc-sun-solaris2* )
+-	   fortran_libs=`/bin/ls -d /opt/SUNWspro/SC* | head -1`/lib ;;
+-	 alpha*-*-osf* )
+-	   fortran_libs="/usr/lib" ;;
+-	 *-hp-hpux1* )
+-	   fortran_libs="/opt/fortran/lib" ;;
+-	 * )
+-	   fortran_libs="" ;;
+-  esac
+-fi
++#  if test "${with_fortran_libs+set}" = set; then
++#    withval="$with_fortran_libs"
++#    fortran_libs="${withval}"
++#  else
++#    # The patterns are not necessarily exclusive, so their order is important.
++#    case "$host" in
++#  	 sparc-sun-sunos4* )
++#  	   fortran_libs="/usr/lang/SC1.0" ;;
++#  	 sparc-sun-solaris2* )
++#  	   fortran_libs=`/bin/ls -d /opt/SUNWspro/SC* | head -1`/lib ;;
++#  	 alpha*-*-osf* )
++#  	   fortran_libs="/usr/lib" ;;
++#  	 *-hp-hpux1* )
++#  	   fortran_libs="/opt/fortran/lib" ;;
++#  	 * )
++#  	   fortran_libs="" ;;
++#    esac
++#  fi
+ 
+ 	
+ #---------------------------------------------------------------------
+@@ -2369,23 +2369,23 @@
+ #  are not necessarily exclusive, so their order is important.
+ #---------------------------------------------------------------------
+ 	
+-case "$host" in
+-  alpha*	) f77_lib_names="Futil ots for Ufor" ;;
+-  *-aix*	) f77_lib_names="xlf xlf90" ;;
+-  *-hpux1*	) f77_lib_names="cl U77" ;;
+-  *-hpux9*	) f77_lib_names="f U77" ;;
+-  *-hpux*	) f77_lib_names="F77 I77 IO77" ;;
+-  *-dec-ultrix*	) f77_lib_names="for i util ots I77 U77 F77" ;;
+-  mips-sgi-irix*) f77_lib_names="F77 I77 U77 isam fpe" ;;
+-  mips-*	) f77_lib_names="F77 I77 U77 isam" ;;
+-  *-solaris2*	) f77_lib_names="F77 M77 sunmath" ;;
+-  *-sunos4*	) f77_lib_names="F77 V77" ;;
+-  titan-*	) f77_lib_names="iF77 uF77 mF77" ;;
+-  *-unicos*	) f77_lib_names="F77 I77 sci f" ;;
+-  *		) f77_lib_names="F77 I77" ;;
+-esac
+-f77_lib_names="$f77_lib_names g2c f2c"
+-for f in $f77_lib_names; do reversed_names="$f $reversed_names"; done
++#  case "$host" in
++#    alpha*	) f77_lib_names="Futil ots for Ufor" ;;
++#    *-aix*	) f77_lib_names="xlf xlf90" ;;
++#    *-hpux1*	) f77_lib_names="cl U77" ;;
++#    *-hpux9*	) f77_lib_names="f U77" ;;
++#    *-hpux*	) f77_lib_names="F77 I77 IO77" ;;
++#    *-dec-ultrix*	) f77_lib_names="for i util ots I77 U77 F77" ;;
++#    mips-sgi-irix*) f77_lib_names="F77 I77 U77 isam fpe" ;;
++#    mips-*	) f77_lib_names="F77 I77 U77 isam" ;;
++#    *-solaris2*	) f77_lib_names="F77 M77 sunmath" ;;
++#    *-sunos4*	) f77_lib_names="F77 V77" ;;
++#    titan-*	) f77_lib_names="iF77 uF77 mF77" ;;
++#    *-unicos*	) f77_lib_names="F77 I77 sci f" ;;
++#    *		) f77_lib_names="F77 I77" ;;
++#  esac
++#  f77_lib_names="$f77_lib_names g2c f2c"
++#  for f in $f77_lib_names; do reversed_names="$f $reversed_names"; done
+ 	
+ #---------------------------------------------------------------------
+ #  On linux (and perhaps other GNU systems), the linker has trouble
+@@ -2393,7 +2393,7 @@
+ #---------------------------------------------------------------------
+ 
+ cat >> confdefs.h <<\EOF
+-#if linux
++#if defined (linux) || defined (__NetBSD__)
+ void MAIN__ (void) {abort();}
+ void etime_ (void) {abort();}
+ #endif
diff --git a/math/algae/patches/patch-ac b/math/algae/patches/patch-ac
new file mode 100644
index 00000000000..1f3fe5e572b
--- /dev/null
+++ b/math/algae/patches/patch-ac
@@ -0,0 +1,13 @@
+$NetBSD: patch-ac,v 1.1.1.1 2002/05/04 01:10:03 jtb Exp $
+
+--- src/Makefile.in.orig	Wed Apr 17 02:53:08 2002
++++ src/Makefile.in	Wed Apr 17 02:53:32 2002
+@@ -126,7 +126,7 @@
+ # <<<< This section is deleted in the "binary" distribution.
+ 
+ algae: $(OBJECTS)
+-	$(CC) $(CFLAGS) $(LDFLAGS) -o algae $(OBJECTS) $(LIBS)
++	$(FC) $(CFLAGS) $(LDFLAGS) -o algae $(OBJECTS) $(LIBS)
+ 
+ Makefile: Makefile.in ../config.status
+ 	cd ..; ./config.status
diff --git a/math/algae/patches/patch-ad b/math/algae/patches/patch-ad
new file mode 100644
index 00000000000..9c3cd98a027
--- /dev/null
+++ b/math/algae/patches/patch-ad
@@ -0,0 +1,13 @@
+$NetBSD: patch-ad,v 1.1.1.1 2002/05/04 01:10:03 jtb Exp $
+
+--- src/main.c.orig	Sat May  3 07:25:04 1997
++++ src/main.c
+@@ -375,7 +375,7 @@
+  * references from the Fortran libraries.
+  */
+ 
+-#if linux
++#if defined (linux) || defined (__NetBSD__)
+ 
+ void
+ MAIN__ (void)
diff --git a/math/algae/patches/patch-ae b/math/algae/patches/patch-ae
new file mode 100644
index 00000000000..1e8c3b29d1a
--- /dev/null
+++ b/math/algae/patches/patch-ae
@@ -0,0 +1,20 @@
+$NetBSD: patch-ae,v 1.1.1.1 2002/05/04 01:10:03 jtb Exp $
+
+--- Makefile.in.orig	Wed Apr 17 03:57:06 2002
++++ Makefile.in	Wed Apr 17 03:57:30 2002
+@@ -78,13 +78,13 @@
+ manext = 1
+ 
+ # Directory in which to install the Info files.
+-infodir = $(prefix)/share/info
++infodir = $(prefix)/info
+ 
+ # Directory in which to install the algae tools.
+ tooldir = $(datadir)/algae/$(VERSION_NUMBER)/tools
+ 
+ # Directory in which to install the algae html files.
+-htmldir = $(datadir)/algae/$(VERSION_NUMBER)/html
++htmldir = $(prefix)/share/doc/algae
+ 
+ # Directory and name of the startup file.  This is compiled into the
+ # executable, so don't change either assignment if you have a binary