home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
pc.louisiana.edu/pub/unix/
/
Louisiana_UNIX.tar
/
Louisiana_UNIX
/
pch618-619
/
pch618-619
< prev
Wrap
Text File
|
1991-09-30
|
27KB
|
1,106 lines
*** 618/CHANGES Thu Sep 26 10:39:38 1991
--- CHANGES Thu Sep 26 10:17:08 1991
***************
*** 1,3 ****
--- 1,20 ----
+ CHANGES BETWEEN 6.19 and 6.18
+ Tom Tkacik
+ -sc.doc and CHANGES changes
+ Edgard
+ -moving right off the screen now redraws vs optimize
+ Sisira Jayasinghe
+ - added build.com (VMS) and VMS fixes
+ Jonathan I. Kamen && Charlie Shub
+ -noted fmod doesn't exist on BSD4.3 and Mt Xinu
+ Ben Priest
+ -vi compatability: ' ' moves right as well as 'l' while line editing
+ Jeff Buhrt
+ -one more possible NULL pointer fixed
+ -added NONOTIMEOUT for those that don't have notimeout() in curses
+ -undef CRYPT=-DCRYPT_PATH... if crypt isn't available
+ -merged simple fmod into interp.c if fmod() is not present
+
CHANGES BETWEEN 6.18 and 6.17
James Dugal
- NULL pointer fix for is_locked
*** 618/README Thu Sep 26 10:39:38 1991
--- README Thu Sep 26 10:47:05 1991
***************
*** 1,9 ****
This is a much modified version of the public domain spread sheet sc,
posted several years ago by Mark Weiser as vc, originally by James Gosling.
! CHANGES lists the changes since 6.1 to 6.18.
! Sc6.16 was released to comp.sources.misc and two sets of patches
! bring Sc6.16->6.17->6.18.
Current maintainer: {sequent, uunet}!sawmill!prslnk!buhrt (Jeff Buhrt)
--- 1,9 ----
This is a much modified version of the public domain spread sheet sc,
posted several years ago by Mark Weiser as vc, originally by James Gosling.
! CHANGES lists the changes since 6.1 to 6.19.
! Sc6.16 was released to comp.sources.misc and three sets of patches
! bring Sc6.16->6.17->6.18->6.19.
Current maintainer: {sequent, uunet}!sawmill!prslnk!buhrt (Jeff Buhrt)
***************
*** 72,78 ****
Archives:
1) (FTP) jpd@usl.edu James Dugal
! pc.usl.edu
2) (UUCP) marc@dumbcat.sf.ca.us (Marco S Hyman)
dumbcat Any ACU 9600 14157850194 "" \d\r in:--in: nuucp word: guest
--- 72,78 ----
Archives:
1) (FTP) jpd@usl.edu James Dugal
! pc.usl.edu in the pub/unix directory
2) (UUCP) marc@dumbcat.sf.ca.us (Marco S Hyman)
dumbcat Any ACU 9600 14157850194 "" \d\r in:--in: nuucp word: guest
*** 618/sc.doc Thu Sep 26 10:39:40 1991
--- sc.doc Thu Sep 26 10:17:15 1991
***************
*** 15,21 ****
.\" - TPs use default indent except for function names, then 18.
.\" - Smallify uppercase strings.
.\" - Avoid passive voice and third person.
! .\" $Revision: 6.18 $
.\"
.TH PNAME\ #REVISION#\ 1
.SH NAME
--- 15,21 ----
.\" - TPs use default indent except for function names, then 18.
.\" - Smallify uppercase strings.
.\" - Avoid passive voice and third person.
! .\" $Revision: 6.19 $
.\"
.TH PNAME\ #REVISION#\ 1
.SH NAME
***************
*** 263,269 ****
A constant string may be preceeded with a backslash (`\\').
In this case the constant string will be used as a ``wheel''
to fill a column, e.g. "\\-" for a line in a column,
! and "\\Yeh " for "Yeh Yeh Ye".
If the cell has a numeric value,
it follows as
.RI [ value ],
--- 263,269 ----
A constant string may be preceeded with a backslash (`\\').
In this case the constant string will be used as a ``wheel''
to fill a column, e.g. "\\-" for a line in a column,
! and "\\Yeh\ " for "Yeh\ Yeh\ Ye".
If the cell has a numeric value,
it follows as
.RI [ value ],
***************
*** 469,474 ****
--- 469,475 ----
If the character cursor is not on the top line, these are alternate,
.IR vi -compatible
cell cursor controls (left, down, up, right).
+ Space is just like l (right).
.TP
.B "H, J, K, L"
If the character cursor is not on the top line, these move the cursor
***************
*** 626,632 ****
to be flushed left against the left edge of the cell.
.\" ----------
.IP \fB"\fP
- .PD 0
Enter a label string into the current cell
to be centered in the column.
.\" ----------
--- 627,632 ----
***************
*** 635,641 ****
Enter a label string into the current cell
to be flushed right against the right edge of the cell.
.\" ----------
- .PD
.TP
.B F
Enter a format string into the current cell. This format string
--- 635,640 ----
***************
*** 751,757 ****
.BR TAB
Mark && append a range (ex: A0:A0)
.br
! TAB, move around w/i a range; TAB, append range string.
.TP
.BR CR
Save
--- 750,756 ----
.BR TAB
Mark && append a range (ex: A0:A0)
.br
! TAB, move around within a range; TAB, append range string.
.TP
.BR CR
Save
***************
*** 765,771 ****
.BR /
Search for a string in the history
.RS
! \fBESC\fP edit the you typed
.br
\fBCR\fP search
.br
--- 764,770 ----
.BR /
Search for a string in the history
.RS
! \fBESC\fP edit the string you typed
.br
\fBCR\fP search
.br
***************
*** 1782,1788 ****
overflows.
.\" ----------
.TP 18
! .B pi
A constant quite close to pi.
.\" ----------
.TP 18
--- 1781,1787 ----
overflows.
.\" ----------
.TP 18
! .B pi\ \ @pi
A constant quite close to pi.
.\" ----------
.TP 18
***************
*** 2232,2238 ****
Jim Clausing,
Dave Close,
Chris Cole,
! Jonathan Crompron
David I. Dalva,
Glen Ditchfield,
Sam Drake,
--- 2231,2237 ----
Jim Clausing,
Dave Close,
Chris Cole,
! Jonathan Crompron,
David I. Dalva,
Glen Ditchfield,
Sam Drake,
***************
*** 2241,2247 ****
Andy Fyfe,
Jack Goral,
Piercarlo "Peter" Grandi,
! Henk Hesselink
Jeffrey C Honig,
Kurt Horton,
Jonathan I. Kamens,
--- 2240,2246 ----
Andy Fyfe,
Jack Goral,
Piercarlo "Peter" Grandi,
! Henk Hesselink,
Jeffrey C Honig,
Kurt Horton,
Jonathan I. Kamens,
***************
*** 2248,2255 ****
Peter King,
Tom Kloos,
Casey Leedom,
! Jay Lepreau
! Dave Lewis,
Rick Linck,
Soren Lundsgaard,
Tad Mannes,
--- 2247,2254 ----
Peter King,
Tom Kloos,
Casey Leedom,
! Jay Lepreau,
! Dave Lewis,
Rick Linck,
Soren Lundsgaard,
Tad Mannes,
*** 618/psc.doc Thu Sep 26 10:38:45 1991
--- psc.doc Thu Sep 26 10:34:28 1991
***************
*** 1,4 ****
! .\" $Revision $
.TH PPNAME\ #REVISION#\ 1
.SH NAME
ppname \- prepare pname files
--- 1,4 ----
! .\" $ Revision $
.TH PPNAME\ #REVISION#\ 1
.SH NAME
ppname \- prepare pname files
*** 618/Makefile Thu Sep 26 10:38:46 1991
--- Makefile Thu Sep 26 15:21:26 1991
***************
*** 1,7 ****
! # Makefile $Revision: 6.17 $
#
# 1) Select the proper EXDIR (path), MANDIR, MANEXT, LIBDIR, SIGVOID,
! # RE_COMP/REGCMP, and DFLT_PAGER. Most of the other things aren't
# normally changed (see the comments with each)
# 2) Select the proper machine/compiler/OS section of code
# for MS-DOS look for the pattern 'MS-DOS'
--- 1,7 ----
! # Makefile $Revision: 6.19 $
#
# 1) Select the proper EXDIR (path), MANDIR, MANEXT, LIBDIR, SIGVOID,
! # RE_COMP/REGCMP, DFLT_PAGER, and FMOD. Most of the other things aren't
# normally changed (see the comments with each)
# 2) Select the proper machine/compiler/OS section of code
# for MS-DOS look for the pattern 'MS-DOS'
***************
*** 88,94 ****
# this is the name to save back ups in
SAVE=-DSAVENAME=\"$(NAME).SAVE\"
! # path to crypt
# most systems
CRYPT=-DCRYPT_PATH=\"/bin/crypt\"
# BSD
--- 88,94 ----
# this is the name to save back ups in
SAVE=-DSAVENAME=\"$(NAME).SAVE\"
! # path to crypt, do not define if you don't have crypt
# most systems
CRYPT=-DCRYPT_PATH=\"/bin/crypt\"
# BSD
***************
*** 96,101 ****
--- 96,110 ----
# other people?
#CRYPT=CRYPT_PATH=\"/usr/local/bin/crypt\"
+ # If you get errors about fmod being undefined when you try to
+ # compile, then define NO_FMOD (most likely BSD4.3 and Mt Xinu).
+ #FMOD=-DNO_FMOD
+ FMOD=
+
+ # If your system doesn't have notimeout() in curses define NONOTIMEOUT
+ NONOTIMEOUT=
+ #NONOTIMEOUT=-DNONOTIMEOUT
+
# flags for lint
LINTFLAGS=-abchxv
***************
*** 122,127 ****
--- 131,142 ----
IDLOKBAD=-DIDLOKBAD
#IDLOKBAD=
+ # If moving right off the screen causes the screen to not redraw
+ # properly, define RIGHT_CBUG to get around a curses problem on some
+ # boxes, this forces screen redraws when going right off the screen
+ RIGHTBUG=
+ #RIGHTBUG=-DRIGHT_CBUG
+
# IF you have problems w/ your yacc try bison, Berkeley yacc, or
# some other yacc. Some systems don't allow you to
# increase the number of terminals (mostly AT&T), SCO's does though.
***************
*** 260,266 ****
screen.o version.o vi.o vmtbl.o xmalloc.o
# The documents in the Archive
! DOCS=CHANGES README sc.doc psc.doc tutorial.sc VMS_NOTES torev
all: $(name) p$(name) $(name)qref
--- 275,281 ----
screen.o version.o vi.o vmtbl.o xmalloc.o
# The documents in the Archive
! DOCS=CHANGES README sc.doc psc.doc tutorial.sc VMS_NOTES torev build.com
all: $(name) p$(name) $(name)qref
***************
*** 307,313 ****
# Objects
cmds.o: cmds.c sc.h
! $(CC) ${CFLAGS} ${DOBACKUPS} -c cmds.c
crypt.o: crypt.c sc.h
$(CC) ${CFLAGS} ${CRYPT} ${DOBACKUPS} -c crypt.c
--- 322,328 ----
# Objects
cmds.o: cmds.c sc.h
! $(CC) ${CFLAGS} ${DOBACKUPS} ${CRYPT} -c cmds.c
crypt.o: crypt.c sc.h
$(CC) ${CFLAGS} ${CRYPT} ${DOBACKUPS} -c crypt.c
***************
*** 315,323 ****
format.o: format.c
help.o: help.c sc.h
interp.o: interp.c sc.h
! $(CC) ${CFLAGS} ${IEEE_MATH} ${SIGVOID} ${RINT} ${RE_COMP} ${REGCMP} -c interp.c
gram.o: sc.h y.tab.h gram.c
$(CC) ${CFLAGS} -c gram.c
--- 330,342 ----
format.o: format.c
help.o: help.c sc.h
+ $(CC) ${CFLAGS} ${CRYPT} -c help.c
+
+ qhelp.o: qhelp.c sc.h
+ $(CC) ${CFLAGS} ${CRYPT} -c qhelp.c
interp.o: interp.c sc.h
! $(CC) ${CFLAGS} ${IEEE_MATH} ${SIGVOID} ${RINT} ${RE_COMP} ${REGCMP} ${FMOD} -c interp.c
gram.o: sc.h y.tab.h gram.c
$(CC) ${CFLAGS} -c gram.c
***************
*** 325,331 ****
sed < gram.y > statres.h -f sres.sed
lex.o: sc.h y.tab.h gram.o lex.c
! $(CC) ${CFLAGS} ${SIMPLE} ${IEEE_MATH} ${SIGVOID} -c lex.c
pxmalloc.o: sc.h pxmalloc.c
$(CC) ${CFLAGS} -c -DPSC pxmalloc.c
--- 344,350 ----
sed < gram.y > statres.h -f sres.sed
lex.o: sc.h y.tab.h gram.o lex.c
! $(CC) ${CFLAGS} ${SIMPLE} ${IEEE_MATH} ${SIGVOID} ${NONOTIMEOUT} -c lex.c
pxmalloc.o: sc.h pxmalloc.c
$(CC) ${CFLAGS} -c -DPSC pxmalloc.c
***************
*** 377,383 ****
name=$(name) NAME=$(NAME) LIBDIR=$(LIBDIR) sh torev sc.doc > $(name).1
# sed -e s/pname/$(name)/g -e s/PNAME/$(NAME)/g \
# -e s%#LIBDIR#%$(LIBDIR)%g sc.doc > $(name).1
! # REVISION=`sed -e '/Revision/!D' -e 's/.*$Revision: 6.17 $(
# sed -e s/pname/$(name)/g -e s/PNAME/$(NAME)/g \
# -e s%#LIBDIR#%$(LIBDIR)%g \
# -e 's/#REVISION#/$(REVISION)/' sc.doc > $(name).1
--- 396,402 ----
name=$(name) NAME=$(NAME) LIBDIR=$(LIBDIR) sh torev sc.doc > $(name).1
# sed -e s/pname/$(name)/g -e s/PNAME/$(NAME)/g \
# -e s%#LIBDIR#%$(LIBDIR)%g sc.doc > $(name).1
! # REVISION=`sed -e '/Revision/!D' -e 's/.*$Revision: 6.19 $(
# sed -e s/pname/$(name)/g -e s/PNAME/$(NAME)/g \
# -e s%#LIBDIR#%$(LIBDIR)%g \
# -e 's/#REVISION#/$(REVISION)/' sc.doc > $(name).1
***************
*** 429,435 ****
diffs: ${SRC}
for i in ${DOCS} ${SRC} ;\
do \
! rcsdiff -c -r6.16 $$i ;\
done
# THA 10/14/90 Added code to make a patchfile
--- 448,454 ----
diffs: ${SRC}
for i in ${DOCS} ${SRC} ;\
do \
! rcsdiff -c -r6.18 $$i ;\
done
# THA 10/14/90 Added code to make a patchfile
*** 618/cmds.c Thu Sep 26 10:39:42 1991
--- cmds.c Thu Sep 26 10:17:26 1991
***************
*** 7,13 ****
*
* More mods Robert Bond, 12/86
*
! * $Revision: 6.18 $
*/
#include <sys/types.h>
--- 7,13 ----
*
* More mods Robert Bond, 12/86
*
! * $Revision: 6.19 $
*/
#include <sys/types.h>
***************
*** 20,26 ****
#endif
#include <curses.h>
! #if defined(BSD42) || defined(BSD43)
#include <sys/file.h>
#else
#include <fcntl.h>
--- 20,26 ----
#endif
#include <curses.h>
! #if defined(BSD42) || defined(BSD43) || defined(VMS)
#include <sys/file.h>
#else
#include <fcntl.h>
***************
*** 1358,1364 ****
char save[PATHLEN];
int pid;
! #if !defined(VMS) && !defined(MSDOS)
if (Crypt) {
return (cwritefile(fname, r0, c0, rn, cn));
}
--- 1358,1364 ----
char save[PATHLEN];
int pid;
! #if !defined(VMS) && !defined(MSDOS) && defined(CRYPT_PATH)
if (Crypt) {
return (cwritefile(fname, r0, c0, rn, cn));
}
***************
*** 1408,1414 ****
(void) strcpy(save,fname);
}
! #if !defined(VMS) && !defined(MSDOS)
if (Crypt) {
creadfile(save, eraseflg);
return;
--- 1408,1414 ----
(void) strcpy(save,fname);
}
! #if !defined(VMS) && !defined(MSDOS) && defined(CRYPT_PATH)
if (Crypt) {
creadfile(save, eraseflg);
return;
***************
*** 1675,1681 ****
}
/* expand a ~ in a path to your home directory */
! #if !defined(MSDOS)
#include <pwd.h>
#endif
char *
--- 1675,1681 ----
}
/* expand a ~ in a path to your home directory */
! #if !defined(MSDOS) && !defined(VMS)
#include <pwd.h>
#endif
char *
***************
*** 1698,1704 ****
if ((*pathptr == '/') || (*pathptr == '\0'))
{ strcpy(tmppath, HomeDir);
}
! #if !defined(MSDOS)
else
{ struct passwd *pwent;
extern struct passwd *getpwnam();
--- 1698,1704 ----
if ((*pathptr == '/') || (*pathptr == '\0'))
{ strcpy(tmppath, HomeDir);
}
! #if !defined(MSDOS) && !defined(VMS)
else
{ struct passwd *pwent;
extern struct passwd *getpwnam();
*** 618/crypt.c Thu Sep 26 10:38:48 1991
--- crypt.c Thu Sep 26 10:17:27 1991
***************
*** 2,10 ****
* Encryption utilites
* Bradley Williams
* {allegra,ihnp4,uiucdcs,ctvax}!convex!williams
! * $Revision: 6.17 $
*/
#include <stdio.h>
#include <curses.h>
--- 2,12 ----
* Encryption utilites
* Bradley Williams
* {allegra,ihnp4,uiucdcs,ctvax}!convex!williams
! * $Revision: 6.19 $
*/
+ #if !defined(VMS) && !defined(MSDOS) && defined(CRYPT_PATH)
+
#include <stdio.h>
#include <curses.h>
***************
*** 189,191 ****
--- 191,194 ----
return(0);
}
+ #endif /* CRYPT_PATH */
*** 618/format.c Thu Sep 26 10:39:43 1991
--- format.c Thu Sep 26 10:31:21 1991
***************
*** 3,9 ****
* Mark Nagel <nagel@ics.uci.edu>
* 20 July 1989
*
! * $Revision: 6.18 $
*
* bool
* format(fmt, num, buf, buflen)
--- 3,9 ----
* Mark Nagel <nagel@ics.uci.edu>
* 20 July 1989
*
! * $Revision: 6.19 $
*
* bool
* format(fmt, num, buf, buflen)
*** 618/help.c Thu Sep 26 10:39:46 1991
--- help.c Thu Sep 26 10:17:31 1991
***************
*** 2,13 ****
* Help functions for sc
* R. Bond, 1988
* J. Buhrt 1990
! * $Revision: 6.18 $
*/
#ifdef QREF
#include <stdio.h>
! char *header = " Quick Reference\n\n$Revision: 6.18 $";
#else
#include <curses.h>
#include "sc.h"
--- 2,13 ----
* Help functions for sc
* R. Bond, 1988
* J. Buhrt 1990
! * $Revision: 6.19 $
*/
#ifdef QREF
#include <stdio.h>
! char *header = " Quick Reference\n\n$Revision: 6.19 $";
#else
#include <curses.h>
#include "sc.h"
***************
*** 49,55 ****
--- 49,59 ----
" l Autolabeling defined cells enable/disable.",
" n If enabled, a digit starts a numeric value.",
" t Top line display enable/disable.",
+ #if !defined(VMS) && !defined(MSDOS) && defined(CRYPT_PATH)
" x Encrypt/decrypt database and listing files.",
+ #else
+ " x Encrypt/decrypt database and listing files (Not available).",
+ #endif
" $ Dollar prescale. If enabled, all numeric constants",
" (not expressions) entered are multipled by 0.01.",
" r Newline action. Toggle between no action, move down",
*** 618/interp.c Thu Sep 26 10:39:50 1991
--- interp.c Thu Sep 26 10:17:39 1991
***************
*** 7,17 ****
*
* More mods Robert Bond, 12/86
* More mods by Alan Silverstein, 3-4/88, see list of changes.
! * $Revision: 6.18 $
*/
#define DEBUGDTS 1 /* REMOVE ME */
!
#include <sys/types.h>
#ifdef aiws
#undef _C_func /* Fixes for undefined symbols on AIX */
--- 7,17 ----
*
* More mods Robert Bond, 12/86
* More mods by Alan Silverstein, 3-4/88, see list of changes.
! * $Revision: 6.19 $
*/
#define DEBUGDTS 1 /* REMOVE ME */
!
#include <sys/types.h>
#ifdef aiws
#undef _C_func /* Fixes for undefined symbols on AIX */
***************
*** 1879,1886 ****
--- 1879,1891 ----
if (isconstant) {
/* prescale input unless it has a decimal */
+ #if defined(IEEE_MATH) && !defined(NO_FMOD)
if (!loading && (prescale < (double)0.9999999) &&
(fmod(val, (double)1.0) == (double)0))
+ #else
+ if (!loading && (prescale < (double)0.9999999) &&
+ ((val - floor(val)) == (double)0))
+ #endif
val *= prescale;
v->v = val;
*** 618/lex.c Thu Sep 26 10:39:51 1991
--- lex.c Thu Sep 26 10:17:41 1991
***************
*** 7,13 ****
*
* More mods Robert Bond, 12/86
* More mods by Alan Silverstein, 3/88, see list of changes.
! * $Revision: 6.18 $
*
*/
--- 7,13 ----
*
* More mods Robert Bond, 12/86
* More mods by Alan Silverstein, 3/88, see list of changes.
! * $Revision: 6.19 $
*
*/
***************
*** 34,39 ****
--- 34,43 ----
#include <setjmp.h>
#include "sc.h"
#include <ctype.h>
+
+ #ifdef NONOTIMEOUT
+ #define notimeout(a1, a2)
+ #endif
#ifdef VMS
#include "gram_tab.h"
*** 618/psc.c Thu Sep 26 10:38:56 1991
--- psc.c Thu Sep 26 10:31:19 1991
***************
*** 17,23 ****
* Author: Robert Bond
* Adjustments: Jeff Buhrt and Eric Putz
*/
! char *rev = "$Revision: 6.17 $";
#include <ctype.h>
#include <stdio.h>
--- 17,23 ----
* Author: Robert Bond
* Adjustments: Jeff Buhrt and Eric Putz
*/
! char *rev = "$Revision: 6.19 $";
#include <ctype.h>
#include <stdio.h>
*** 618/range.c Thu Sep 26 10:38:57 1991
--- range.c Thu Sep 26 10:31:17 1991
***************
*** 4,10 ****
*
* Robert Bond, 4/87
*
! * $Revision: 6.17 $
*/
#include <sys/types.h>
--- 4,10 ----
*
* Robert Bond, 4/87
*
! * $Revision: 6.19 $
*/
#include <sys/types.h>
*** 618/sc.c Thu Sep 26 10:39:52 1991
--- sc.c Thu Sep 26 15:21:29 1991
***************
*** 8,14 ****
* More mods Robert Bond, 12/86
* More mods by Alan Silverstein, 3-4/88, see list of changes.
* Currently supported by sequent!sawmill!buhrt (Jeff Buhrt)
! * $Revision: 6.18 $
*
*/
--- 8,14 ----
* More mods Robert Bond, 12/86
* More mods by Alan Silverstein, 3-4/88, see list of changes.
* Currently supported by sequent!sawmill!buhrt (Jeff Buhrt)
! * $Revision: 6.19 $
*
*/
***************
*** 67,72 ****
--- 67,75 ----
int numeric;
char *mdir;
int showsc, showsr; /* Starting cell for highlighted range */
+ #ifdef RIGHT_CBUG
+ int wasforw = FALSE;
+ #endif
void update();
void repaint();
***************
*** 96,102 ****
#endif
extern int lastmx, lastmy; /* Screen address of the cursor */
! extern int lastcol, cols; /* Spreadsheet Column the cursor was in last */
/* a linked list of free [struct ent]'s, uses .next as the pointer */
struct ent *freeents = NULL;
--- 99,105 ----
#endif
extern int lastmx, lastmy; /* Screen address of the cursor */
! extern int lastcol, lcols; /* Spreadsheet Column the cursor was in last */
/* a linked list of free [struct ent]'s, uses .next as the pointer */
struct ent *freeents = NULL;
***************
*** 206,213 ****
--- 209,220 ----
#if defined(MSDOS)
if ((revi = strrchr(argv[0], '\\')) != NULL)
#else
+ #ifdef VMS
+ if ((revi = strrchr(argv[0], ']')) != NULL)
+ #else
if ((revi = strrchr(argv[0], '/')) != NULL)
#endif
+ #endif
progname = revi+1;
else
progname = argv[0];
***************
*** 405,410 ****
--- 412,420 ----
numeric_field = 0;
}
forwcol(arg);
+ #ifdef RIGHT_CBUG
+ wasforw++;
+ #endif
break;
case ctl('g'):
***************
*** 1194,1200 ****
break;
#endif
case 'L':
! forwcol(cols-(curcol-stcol)+1);
break;
case ' ':
case 'l':
--- 1204,1210 ----
break;
#endif
case 'L':
! forwcol(lcols -(curcol-stcol)+1);
break;
case ' ':
case 'l':
***************
*** 1416,1422 ****
for (r=r1; r<=r2; r++)
for (c=c1; c<=c2; c++) {
p = *ATBL(tbl, r, c);
! if (p->flags&is_locked)
return(1);
}
return(0);
--- 1426,1432 ----
for (r=r1; r<=r2; r++)
for (c=c1; c<=c2; c++) {
p = *ATBL(tbl, r, c);
! if (p && (p->flags & is_locked))
return(1);
}
return(0);
*** 618/sc.h Thu Sep 26 10:39:53 1991
--- sc.h Thu Sep 26 10:32:49 1991
***************
*** 6,12 ****
* University of Maryland
* R. Bond 12/86
* More mods by Alan Silverstein, 3-4/88, see list of changes.
! * $Revision: 6.18 $
*
*/
--- 6,12 ----
* University of Maryland
* R. Bond 12/86
* More mods by Alan Silverstein, 3-4/88, see list of changes.
! * $Revision: 6.19 $
*
*/
*** 618/screen.c Thu Sep 26 10:39:54 1991
--- screen.c Thu Sep 26 15:21:27 1991
***************
*** 8,14 ****
* More mods Robert Bond, 12/86
* More mods by Alan Silverstein, 3-4/88, see list of changes.
* Currently supported by sequent!sawmill!buhrt (Jeff Buhrt)
! * $Revision: 6.18 $
*
*/
--- 8,14 ----
* More mods Robert Bond, 12/86
* More mods by Alan Silverstein, 3-4/88, see list of changes.
* Currently supported by sequent!sawmill!buhrt (Jeff Buhrt)
! * $Revision: 6.19 $
*
*/
***************
*** 16,21 ****
--- 16,26 ----
#include <curses.h>
#include "sc.h"
+ #ifdef VMS
+ extern int VMS_read_raw; /*sigh*/
+ VMS_read_raw = 1;
+ #endif
+
#ifdef BROKENCURSES
/* nl/nonl bug fix */
#undef nl
***************
*** 30,36 ****
char mode_ind = '.';
extern char revmsg[];
! int rows, cols;
int lastmx, lastmy; /* Screen address of the cursor */
int lastcol; /* Spreadsheet Column the cursor was in last */
extern int *fwidth;
--- 35,41 ----
char mode_ind = '.';
extern char revmsg[];
! int rows, lcols;
int lastmx, lastmy; /* Screen address of the cursor */
int lastcol; /* Spreadsheet Column the cursor was in last */
extern int *fwidth;
***************
*** 37,42 ****
--- 42,50 ----
extern int showrange; /* Causes ranges to be highlighted */
extern int showneed; /* Causes cells needing values to be highlighted */
extern int showexpr; /* Causes cell exprs to be displayed, highlighted */
+ #ifdef RIGHT_CBUG
+ extern int wasforw; /* Causes screen to be redisplay if on lastcol */
+ #endif
/*
* update() does general screen update
***************
*** 69,77 ****
/* First see if the last display still covers curcol */
if (stcol <= curcol) {
! for (i = stcol, cols = 0, col = RESCOL;
(col + fwidth[i]) < COLS-1 && i < maxcols; i++) {
! cols++;
if (col_hidden[i])
continue;
--- 77,85 ----
/* First see if the last display still covers curcol */
if (stcol <= curcol) {
! for (i = stcol, lcols = 0, col = RESCOL;
(col + fwidth[i]) < COLS-1 && i < maxcols; i++) {
! lcols++;
if (col_hidden[i])
continue;
***************
*** 78,88 ****
col += fwidth[i];
}
}
! while (stcol + cols - 1 < curcol || curcol < stcol) {
FullUpdate++;
if (stcol - 1 == curcol) { /* How about back one? */
stcol--;
! } else if (stcol + cols == curcol) { /* Forward one? */
stcol++;
} else {
/* Try to put the cursor in the center of the screen */
--- 86,96 ----
col += fwidth[i];
}
}
! while (stcol + lcols - 1 < curcol || curcol < stcol) {
FullUpdate++;
if (stcol - 1 == curcol) { /* How about back one? */
stcol--;
! } else if (stcol + lcols == curcol) { /* Forward one? */
stcol++;
} else {
/* Try to put the cursor in the center of the screen */
***************
*** 96,104 ****
}
}
/* Now pick up the counts again */
! for (i = stcol, cols = 0, col = RESCOL;
(col + fwidth[i]) < COLS-1 && i < maxcols; i++) {
! cols++;
if (col_hidden[i])
continue;
col += fwidth[i];
--- 104,112 ----
}
}
/* Now pick up the counts again */
! for (i = stcol, lcols = 0,col = RESCOL;
(col + fwidth[i]) < COLS-1 && i < maxcols; i++) {
! lcols++;
if (col_hidden[i])
continue;
col += fwidth[i];
***************
*** 148,154 ****
}
lastcurrow = currow;
}
! mxcol = stcol + cols - 1;
mxrow = strow + rows - 1;
/* Get rid of cursor standout on the cell at previous cursor position */
--- 156,162 ----
}
lastcurrow = currow;
}
! mxcol = stcol + lcols - 1;
mxrow = strow + rows - 1;
/* Get rid of cursor standout on the cell at previous cursor position */
***************
*** 189,194 ****
--- 197,208 ----
(void) printw("%-*d", RESCOL, i);
row++;
}
+ #ifdef RIGHT_CBUG
+ if(wasforw) {
+ clearok(stdscr, TRUE);
+ wasforw = 0;
+ }
+ #endif
(void) move(2,0);
(void) printw("%*s", RESCOL, " ");
*** 618/version.c Thu Sep 26 10:39:54 1991
--- version.c Thu Sep 26 10:18:47 1991
***************
*** 4,7 ****
* The part after the first colon, except the last char, appears on the screen.
*/
! char *rev = "$Revision: 6.18 $";
--- 4,7 ----
* The part after the first colon, except the last char, appears on the screen.
*/
! char *rev = "$Revision: 6.19 $";
*** 618/vi.c Thu Sep 26 10:39:55 1991
--- vi.c Thu Sep 26 10:18:04 1991
***************
*** 1,7 ****
/* SC A Spreadsheet Calculator
*
* One line vi emulation
! * $Revision: 6.18 $
*/
#include <sys/types.h>
--- 1,7 ----
/* SC A Spreadsheet Calculator
*
* One line vi emulation
! * $Revision: 6.19 $
*/
#include <sys/types.h>
***************
*** 112,117 ****
--- 112,118 ----
case 'i': u_save(c); insert_mode(); break;
case 'j': for_hist(); break;
case 'k': back_hist(); break;
+ case ' ':
case 'l': linelim = for_line(0); break;
case 'n': search_again(); break;
case 'q': stop_edit(); break;
*** 618/vmtbl.c Thu Sep 26 10:39:02 1991
--- vmtbl.c Thu Sep 26 10:31:04 1991
***************
*** 8,14 ****
* More mods Robert Bond, 12/86
* More mods by Alan Silverstein, 3-4/88, see list of changes.
* Currently supported by sequent!sawmill!buhrt (Jeff Buhrt)
! * $Revision: 6.17 $
*
*/
#ifdef PSC
--- 8,14 ----
* More mods Robert Bond, 12/86
* More mods by Alan Silverstein, 3-4/88, see list of changes.
* Currently supported by sequent!sawmill!buhrt (Jeff Buhrt)
! * $Revision: 6.19 $
*
*/
#ifdef PSC
*** 618/xmalloc.c Thu Sep 26 10:39:02 1991
--- xmalloc.c Thu Sep 26 10:31:15 1991
***************
*** 1,6 ****
/*
* A safer saner malloc, for careless programmers
! * $Revision: 6.17 $
*/
#include <stdio.h>
--- 1,6 ----
/*
* A safer saner malloc, for careless programmers
! * $Revision: 6.19 $
*/
#include <stdio.h>