diff options
Diffstat (limited to 'math/fudgit/files')
-rw-r--r-- | math/fudgit/files/patch-aa | 35 | ||||
-rw-r--r-- | math/fudgit/files/patch-ab | 223 | ||||
-rw-r--r-- | math/fudgit/files/patch-ac | 121 | ||||
-rw-r--r-- | math/fudgit/files/patch-ad | 34 |
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; - |