summaryrefslogtreecommitdiff
path: root/math/fudgit/files
diff options
context:
space:
mode:
Diffstat (limited to 'math/fudgit/files')
-rw-r--r--math/fudgit/files/patch-aa35
-rw-r--r--math/fudgit/files/patch-ab223
-rw-r--r--math/fudgit/files/patch-ac121
-rw-r--r--math/fudgit/files/patch-ad34
4 files changed, 0 insertions, 413 deletions
diff --git a/math/fudgit/files/patch-aa b/math/fudgit/files/patch-aa
deleted file mode 100644
index 1770eb212a6f..000000000000
--- a/math/fudgit/files/patch-aa
+++ /dev/null
@@ -1,35 +0,0 @@
-*** Makefile.in.orig Wed Nov 9 17:20:09 1994
---- Makefile.in Sat Nov 12 02:58:47 1994
-***************
-*** 89,94 ****
---- 89,105 ----
- @ endif
- CHECK = @echo "Building FUDGIT for datagen..."
- @ endif
-+ @ comment ==================================================== 386bsd
-+ @ if freebsd
-+ # This Makefile was generated for freebsd
-+ OPTIONS = -DNOTRUNC -DNOMALLINFO -DVOID_SIGHANDLER -DWAIT3_INT \
-+ -DNOMALLOC_H -DHAVE_UNISTD_H -DHAVE_STDLIB_H
-+ CFLAGS = $(OPTIONS) $(DLOPTIONS) -pipe -O2 -fomit-frame-pointer
-+ LDFLAGS = -L../libs $(DLLIB) $(DLDLIB) -lreadline -ltermcap -lm
-+ LLFLAGS = -ll
-+ CC = cc
-+ CHECK = @echo "Building FUDGIT for freebsd..."
-+ @ endif
- @ comment ==================================================== hpux
- @ if hpux
- # This Makefile was generated for HPUX
-***************
-*** 311,315 ****
- cp docs/fudgit.help $(LIBDIR)
- chmod 444 $(LIBDIR)/fudgit.help
- cp docs/fudgit.1 $(MANDIR)
-! chmod 444 $(LIBDIR)/fudgit.1
-
---- 322,326 ----
- cp docs/fudgit.help $(LIBDIR)
- chmod 444 $(LIBDIR)/fudgit.help
- cp docs/fudgit.1 $(MANDIR)
-! chmod 444 $(MANDIR)/fudgit.1
-
diff --git a/math/fudgit/files/patch-ab b/math/fudgit/files/patch-ab
deleted file mode 100644
index f4f6e590f59d..000000000000
--- a/math/fudgit/files/patch-ab
+++ /dev/null
@@ -1,223 +0,0 @@
---- src/command.c.orig Tue Nov 8 00:23:31 1994
-+++ src/command.c Sat Oct 19 22:41:03 2002
-@@ -38,8 +38,8 @@
- extern int Ft_printversion(void);
- extern Ft_mathyyparse(void);
-
--extern int write_history(char *);
--extern int append_history(int, char *);
-+//extern int write_history(char *);
-+//extern int append_history(int, char *);
- extern HIST_ENTRY **history_list(void);
-
- typedef union {
-@@ -244,6 +244,8 @@
- "legendre series: n = 1,...N { Pn(X) }"},
- {"lo!rentzian", do_stfunc, "set function lorentzian", "",
- "Lorentzian series: n = 3, 6...N { A[n-1]*((X*A[n])^2/((X^2-A[n-2]^2)^2+(X*A[n])^2) }"},
-+ {"n!one", do_stfunc, "set function none", "",
-+ "none"},
- {"p!olynomial", do_stfunc, "set function polynomial", "",
- "power series: n = 1,...N { A[n]*X^(n-1) }"},
- {"u!ser", do_stfunc, "set function user", "definition",
-@@ -268,6 +270,8 @@
- "least square linear regression"},
- {"m!l_fit", do_stmeth, "set method ml_fit", "",
- "Marquardt-Levenberg iterative nonlinear fit"},
-+ {"n!one", do_stmeth, "set method none", "",
-+ "none"},
- {"s!vd_fit", do_stmeth, "set method svd_fit", "",
- "singular value decomposition linear fit"},
- { 0, 0, 0, 0, 0 }
-*** src/fudgit.h.orig Thu Sep 8 16:02:47 1994
---- src/fudgit.h Mon Aug 5 06:32:38 1996
-***************
-*** 97,103 ****
- * name.
- * Ideally, this exception is left for .fudgitrc.
- */
-! /* #define EXTENSION ".ft" */
- /* The following are required when defining argument prototypes of
- * loaded routines.
- */
---- 97,103 ----
- * name.
- * Ideally, this exception is left for .fudgitrc.
- */
-! #define EXTENSION ".ft"
- /* The following are required when defining argument prototypes of
- * loaded routines.
- */
-*** src/setshow.c.orig Mon Nov 7 07:57:49 1994
---- src/setshow.c Mon Aug 5 06:32:39 1996
-***************
-*** 67,73 ****
- int Ft_Funci;
-
- Meth Ft_Method[METHNUM] = {
-! {"none", "none"},
- {"ls_r!eg", "least square linear regression"},
- {"lad!_reg", "least absolute deviation linear regression"},
- {"ls_f!it", "least square linear fit"},
---- 67,73 ----
- int Ft_Funci;
-
- Meth Ft_Method[METHNUM] = {
-! {"n!one", "none"},
- {"ls_r!eg", "least square linear regression"},
- {"lad!_reg", "least absolute deviation linear regression"},
- {"ls_f!it", "least square linear fit"},
-***************
-*** 76,82 ****
- };
-
- Func Ft_Function[FUNCNUM] = {
-! {"none", "none"},
- {"str!aight", "straight line"},
- {"po!lynomial", "polynomial"},
- {"leg!endre", "Legendre polynomial"},
---- 76,82 ----
- };
-
- Func Ft_Function[FUNCNUM] = {
-! {"n!one", "none"},
- {"str!aight", "straight line"},
- {"po!lynomial", "polynomial"},
- {"leg!endre", "Legendre polynomial"},
-*** src/vgetargp.c.orig Fri Sep 2 23:02:47 1994
---- src/vgetargp.c Mon Aug 5 06:32:39 1996
-***************
-*** 75,93 ****
-
- /* go along the string */
- while (*b != '\0' && argno < MAXTOKEN) {
-! switch (*b) {
- #ifdef BACKSLASH
-! case '\\': /* only recognize \$ in non fmodes */
-! if (leavequotes == ERRR) {
-! leavequotes = ( Ft_almost(p[0], "pm!ode") ||
-! Ft_almost(p[0], "cm!ode") ||
-! Ft_almost(p[0], "le!t") );
-! }
-! if (expansion && b[1] != '\n' && (!leavequotes || b[1] == '$')) {
-! b++;
-! }
-! COPY(b);
-! break;
- #endif
- case SQUOTE: /* take following as one string, + turn off exp */
- if (leavequotes == 1 || indquotes || inpar) {
---- 75,187 ----
-
- /* go along the string */
- while (*b != '\0' && argno < MAXTOKEN) {
-! switch (*b)
-! {
- #ifdef BACKSLASH
-! /* add support for C-style escape sequences */
-! case '\\':
-! {
-! if (leavequotes == ERRR) {
-! leavequotes = (
-! Ft_almost(p[0], "pm!ode") ||
-! Ft_almost(p[0], "cm!ode") ||
-! Ft_almost(p[0], "le!t") );
-! }
-!
-! /* only recognize escape sequences in non fmodes */
-! if (expansion && b[1] != '\n' && (!leavequotes || b[1] == '$')) {
-! int dummy = -1;
-! int * dptr = &dummy;
-! b++; /* skip over '\\' */
-!
-! switch (*b)
-! {
-! case '\0':
-! break;
-! case '\'':
-! dummy = '\'';
-! break;
-! case '\"':
-! dummy = '\"';
-! break;
-! case '$':
-! dummy = '$';
-! break;
-! case '?':
-! dummy = '\?';
-! break;
-! case 'a':
-! dummy = '\a';
-! break;
-! case 'b':
-! dummy = '\b';
-! break;
-! case 'f':
-! dummy = '\f';
-! break;
-! case 'n':
-! dummy = '\n';
-! break;
-! case 'r':
-! dummy = '\r';
-! break;
-! case 't':
-! dummy = '\t';
-! break;
-! case 'x':
-! if (!isxdigit(b[1]))
-! break;
-! b++;
-! dummy = tolower(*b) -
-! (isdigit(*b) ? '0' : ('a' - 10));
-! if (!isxdigit(b[1]))
-! break;
-! b++;
-! dummy *= 16;
-! dummy += tolower(*b) -
-! (isdigit(*b) ? '0' : ('a' - 10));
-! break;
-! case 'v':
-! dummy = '\v';
-! break;
-! case '0':
-! case '1':
-! case '2':
-! case '3':
-! case '4':
-! case '5':
-! case '6':
-! case '7':
-! dummy = *b - '0';
-! if ((b[1] < '0') || (b[1] > '7'))
-! break;
-! b++;
-! dummy *= 8;
-! dummy += *b - '0';
-! if ((b[1] < '0') || (b[1] > '7'))
-! break;
-! b++;
-! dummy *= 8;
-! dummy += *b - '0';
-! break;
-! case '\\':
-! dummy = '\\';
-! break;
-! default:
-! break;
-! }
-! if (dummy < 0) {
-! dummy = '\\';
-! } else {
-! b++;
-! }
-! COPY(dptr);
-! break;
-! } else {
-! COPY(b);
-! break;
-! }
-! }
- #endif
- case SQUOTE: /* take following as one string, + turn off exp */
- if (leavequotes == 1 || indquotes || inpar) {
diff --git a/math/fudgit/files/patch-ac b/math/fudgit/files/patch-ac
deleted file mode 100644
index 6972af84f812..000000000000
--- a/math/fudgit/files/patch-ac
+++ /dev/null
@@ -1,121 +0,0 @@
-*** ./docs/reference.tmpl.orig Mon Nov 7 15:50:52 1994
---- ./docs/reference.tmpl Mon Aug 5 06:34:20 1996
-***************
-*** 988,994 ****
- let String = "new.file"
- let x = (String == "new.file")
- let y = ("file1" == "file2")
-! let Bing = "\a\a\a"
- let Here = Cwd # Store the value of the current working directory
- let Input = Read() # Read from stdin
- let Test = FileName(ReadFile) - ".data"
---- 988,994 ----
- let String = "new.file"
- let x = (String == "new.file")
- let y = ("file1" == "file2")
-! let Bing = "\verb+\a+\verb+\a+\verb+\a+"
- let Here = Cwd # Store the value of the current working directory
- let Input = Read() # Read from stdin
- let Test = FileName(ReadFile) - ".data"
-***************
-*** 996,1002 ****
- let y = scan(Read(), "%lf")
- let File = "STRING_23.4"
- let number = scan("%*[_A-Z]%lf", File)
-! let Message = "A tab \t and a newline\n"
- \end{verbatim}
- @ifhelp
-
---- 996,1002 ----
- let y = scan(Read(), "%lf")
- let File = "STRING_23.4"
- let number = scan("%*[_A-Z]%lf", File)
-! let Message = "A tab \verb+\t+ and a newline\verb+\n+"
- \end{verbatim}
- @ifhelp
-
-***************
-*** 1800,1806 ****
-
- /* You have full use of math and stdio libraries too!!! */
- fprintf(stderr,
-! "BTW, Did you know that %lf is the sqrt(pi)?\n", sqrt(M_PI));
-
- half_n = n >>1; /* half of n */
- for (i=0;i<half_n;i++) { /* Standard C: indices from 0 to data-1 */
---- 1800,1806 ----
-
- /* You have full use of math and stdio libraries too!!! */
- fprintf(stderr,
-! "BTW, Did you know that %lf is the sqrt(pi)?\verb+\n+", sqrt(M_PI));
-
- half_n = n >>1; /* half of n */
- for (i=0;i<half_n;i++) { /* Standard C: indices from 0 to data-1 */
-***************
-*** 2800,2806 ****
- \nopagebreak\begin{verbatim}
- set output stdout
- cmode
-! print x, y, "\n"
- \end{verbatim}
- @ifhelp
-
---- 2800,2806 ----
- \nopagebreak\begin{verbatim}
- set output stdout
- cmode
-! print x, y, "\verb+\n+"
- \end{verbatim}
- @ifhelp
-
-***************
-*** 2830,2836 ****
- cmode
- print x+2
- print String, x, y, z
-! print "Warning \a\a\a", "x = ", x, "\n"
- \end{verbatim}
-
- \Seealso
---- 2830,2836 ----
- cmode
- print x+2
- print String, x, y, z
-! print "Warning \verb+\a+\verb+\a+\verb+\a+", "x = ", x, "\verb+\n+"
- \end{verbatim}
-
- \Seealso
-***************
-*** 2876,2882 ****
- b += a
- a = c
- }
-! print "\n"
- }
- # The following 'for' loop is equivalent to the preceding fib()
- proc fib2(x) {
---- 2876,2882 ----
- b += a
- a = c
- }
-! print "\verb+\n+"
- }
- # The following 'for' loop is equivalent to the preceding fib()
- proc fib2(x) {
-***************
-*** 2885,2891 ****
- for(a=0,b=1;b<x;c=b,b+=a,a=c) {
- print b
- }
-! print "\n"
- }
- fib(1000) # A procedure as called from C-calculator mode.
- fmode
---- 2885,2891 ----
- for(a=0,b=1;b<x;c=b,b+=a,a=c) {
- print b
- }
-! print "\verb+\n+"
- }
- fib(1000) # A procedure as called from C-calculator mode.
- fmode
diff --git a/math/fudgit/files/patch-ad b/math/fudgit/files/patch-ad
deleted file mode 100644
index 0e57e5a95455..000000000000
--- a/math/fudgit/files/patch-ad
+++ /dev/null
@@ -1,34 +0,0 @@
---- src/head.h~ Sat Sep 3 08:02:18 1994
-+++ src/head.h Sat Oct 19 22:35:57 2002
-@@ -84,9 +84,9 @@
- extern int Ft_varcpy(char *, char *);
- extern int Ft_vgetargp (char *b, char **p, int type, char **add);
- extern int Ft_vgetargp(char *b, char **p, int type, char **add);
--extern int append_history(int, char *);
-+//extern int append_history(int, char *);
- extern int history_expand(char *, char **);
--extern int write_history(char *);
-+//extern int write_history(char *);
- extern void Ft_cleanframe (void);
- extern void Ft_fit (double *x, double *y, int ndata, double *sig, int mwt, double *a, double *b, double *siga, double *sigb, double *chi2, double *q);
- extern void Ft_free_dmatrix(double **m, int nrl, int nrh, int ncl, int nch);
-@@ -105,7 +105,7 @@
- extern void Ft_pearsn (double *x, double *y, int n, double *r, double *prob, double *z);
- extern void Ft_resetindex(void);
- extern void Ft_resetprog(void);
--extern void add_history(char *);
-+//extern void add_history(char *);
- int Ft_printversion (void);
- void Ft_reaperon(void);
- void Ft_reaperoff(void);
---- src/macro.c~ Mon Nov 7 22:07:40 1994
-+++ src/macro.c Sat Oct 19 22:36:09 2002
-@@ -64,7 +64,7 @@
- jmp_buf Ft_Jump;
-
- extern int history_expand(char *, char **);
--extern void add_history(char *);
-+//extern void add_history(char *);
- extern char *readline(char *);
- extern int Ft_Interact;
-