aboutsummaryrefslogtreecommitdiffstats
path: root/math/fudgit/files/patch-ac
diff options
context:
space:
mode:
authorJean-Marc Zucconi <jmz@FreeBSD.org>1996-08-05 14:06:09 +0000
committerJean-Marc Zucconi <jmz@FreeBSD.org>1996-08-05 14:06:09 +0000
commitdcc7e4d985c523b34dea3d9dbad2aef3fb3c4f2a (patch)
tree493777567b7ba312a5f5b9b2e6685b533f537987 /math/fudgit/files/patch-ac
parent4eaa69e219fe247ae6e2a11fd6764a2564459a39 (diff)
Add support for the
set function none set method none commands, cause the default extension of ".ft" to be tried on all loaded fudgit files and adds support for C-style escape sequences in fudgit commands (which was *implied* in the fudgitrc file distributed in the sources but apparently never implemented). Correct some minor typos in the on-line help. Submitted by: Don Yuniskis <dgy@rtd.com>
Diffstat (limited to 'math/fudgit/files/patch-ac')
-rw-r--r--math/fudgit/files/patch-ac121
1 files changed, 121 insertions, 0 deletions
diff --git a/math/fudgit/files/patch-ac b/math/fudgit/files/patch-ac
new file mode 100644
index 000000000000..6972af84f812
--- /dev/null
+++ b/math/fudgit/files/patch-ac
@@ -0,0 +1,121 @@
+*** ./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