summaryrefslogtreecommitdiff
path: root/shells/scsh/files/patch-ab
diff options
context:
space:
mode:
authorMasafumi Max NAKANE <max@FreeBSD.org>1997-01-03 00:37:20 +0000
committerMasafumi Max NAKANE <max@FreeBSD.org>1997-01-03 00:37:20 +0000
commit6a68b60f92eeffd18741444d2f66a6493229529f (patch)
tree6e0f3e66e904a53856b54d94c65c0f99f33d04bf /shells/scsh/files/patch-ab
parentRenaming the PKIGNAME, etlfnot-noncjk -> etlfonts-noncjk. (diff)
New port, scsh:
A Unix shell embedded into Scheme, with access to all Posix calls Reviewed by: max Submitted by: cracauer@cons.org "Martin Cracauer"
Notes
Notes: svn path=/head/; revision=5173
Diffstat (limited to 'shells/scsh/files/patch-ab')
-rw-r--r--shells/scsh/files/patch-ab19
1 files changed, 19 insertions, 0 deletions
diff --git a/shells/scsh/files/patch-ab b/shells/scsh/files/patch-ab
new file mode 100644
index 000000000000..a75d1e93ac41
--- /dev/null
+++ b/shells/scsh/files/patch-ab
@@ -0,0 +1,19 @@
+*** env/command.scm.original Tue Nov 26 15:59:38 1996
+--- env/command.scm Tue Nov 26 15:59:46 1996
+***************
+*** 546,552 ****
+ ((char=? (string-ref line 0) #\n) #f)
+ (else (loop count)))))))
+
+! (define *y-or-n-eof-count* 100)
+
+ (define (read-line port)
+ (let loop ((l '()))
+--- 546,552 ----
+ ((char=? (string-ref line 0) #\n) #f)
+ (else (loop count)))))))
+
+! (define *y-or-n-eof-count* 0)
+
+ (define (read-line port)
+ (let loop ((l '()))