Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!watmath!clyde!cbatt!cbosgd!mirror!sources-request From: sources-request@mirror.UUCP Newsgroups: mod.sources Subject: v08i006: Georgia Tech 'se' Screen Editor Message-ID: <1414@mirror.TMC.COM> Date: Mon, 26-Jan-87 16:22:16 EST Article-I.D.: mirror.1414 Posted: Mon Jan 26 16:22:16 1987 Date-Received: Tue, 27-Jan-87 05:45:02 EST Sender: rs@mirror.TMC.COM Lines: 1019 Approved: mirror!rs Submitted by: emoryu1!arnold (Arnold D. Robbins) Mod.sources: Volume 8, Issue 6 Archive-name: se/Part06 Here is the second release of the Georgia Tech Screen Editor, 'se'. There were enough changes that a whole new posting is warranted. Major Changes: All Georgia Tech specific stuff removed. It understands window size changes on 4.3BSD and ATT Unix PC/3B1 Support for the shared library on the ATT Unix PC/3B1 Considerable source code reorganization in certain files. Enjoy, Arnold Robbins #! /bin/sh # This is a shell archive, meaning: # 1. Remove everything above the #! /bin/sh line. # 2. Save the resulting text in a file. # 3. Execute the file with /bin/sh (not csh) to create the files: # README # Makefile # Install # a # abt # ah # arg2 # args # b # bang # bug # c # cc # ccmisc # chardel # charins # colon # com # comdir # comsyn # d # detab.c # dir # e # eh # elp # equal # f # g # h # i # j # k # l # list # ln # m # motion # n export PATH; PATH=/bin:$PATH if test ! -d 'se_h' then echo shar: creating directory "'se_h'" mkdir 'se_h' fi echo shar: entering directory "'se_h'" cd 'se_h' echo shar: extracting "'README'" '(728 characters)' if test -f 'README' then echo shar: will not over-write existing file "'README'" else cat << \SHAR_EOF > 'README' # # $Header: README,v 1.2 86/10/07 15:17:34 arnold Exp $ # # $Log: README,v $ # Revision 1.2 86/10/07 15:17:34 arnold # Swt help files removed, so no longer described. # # Revision 1.1 86/05/06 14:04:26 osadr # Initial revision # # # README: This directory contains the help files for the Georgia Tech Software Tools/UNIX screen editor Se. The files should be installed in the directory /usr/local/lib/se_h for se in order for se to find them. File names must be in lower case, since dohelp() maps the file name into all lower case. (On pr1mes, case is not significant in file names, so the original ratfor version did not have to do this.) Arnold Robbins formerly of Georgia Tech Now with Emory University 10/86 SHAR_EOF fi # end of overwriting check echo shar: extracting "'Makefile'" '(1093 characters)' if test -f 'Makefile' then echo shar: will not over-write existing file "'Makefile'" else cat << \SHAR_EOF > 'Makefile' # # $Header: Makefile,v 1.2 86/10/07 15:15:04 arnold Exp $ # # $Log: Makefile,v $ # Revision 1.2 86/10/07 15:15:04 arnold # Updated to reflect current set of help files. # # Revision 1.1 86/05/06 14:04:17 osadr # Initial revision # # # # makefile for se help scripts DOCS= README FILES= a abt ah arg2 args b bang bug c cc ccmisc chardel charins colon \ com comdir comsyn d dir e eh elp equal f g h i j k l list ln m \ motion n o o- oa oc od of og oh oi ok ol olm om os ot ou ov ow \ ox oy oz p pat patex q quote r rpt s scan serc shell specl t \ termchar tilde u v w x y z # destination for final version of help scripts. INSTALL=/usr/local/lib/se_h install: existsall detab ./Install $(INSTALL) $(FILES) existsall: $(FILES) $(DOCS) Install @echo this message indicates all the files exist, otherwise make would die. detab: detab.c cc -O -o detab detab.c clean: rm -f detab print2 clobber: clean print: prt $(DOCS) Makefile Install $(FILES) | lpr -b 'se help' touch print2 print2: $(DOCS) Makefile Install $(FILES) prt $? | lpr -b 'new se help' touch print2 SHAR_EOF fi # end of overwriting check echo shar: extracting "'Install'" '(678 characters)' if test -f 'Install' then echo shar: will not over-write existing file "'Install'" else cat << \SHAR_EOF > 'Install' #! /bin/sh # # $Header: Install,v 1.2 86/10/07 15:09:08 arnold Exp $ # # $Log: Install,v $ # Revision 1.2 86/10/07 15:09:08 arnold # Fixed to make the help directory and use relative paths. # # Revision 1.1 86/05/06 14:04:04 osadr # Initial revision # # # : Install -- put se help files into their proper directory. : This program is called from the makefile. INSTALL=$1 shift umask 022 if [ ! -d $INSTALL ] then echo making directory $INSTLL if mkdir $INSTALL then : else echo could not mkdir $INSTALL exit 1 fi fi for i in $* do echo installing $i ./detab < $i > $INSTALL/$i done : we really should do some error checking, but what the heck. SHAR_EOF chmod +x 'Install' fi # end of overwriting check echo shar: extracting "'a'" '(793 characters)' if test -f 'a' then echo shar: will not over-write existing file "'a'" else cat << \SHAR_EOF > 'a' a -- Append command default range syntax . a "a" is for appending new lines of text after a given line. If no line number is typed before the "a", text will be appended after the current line. The last line appended becomes the current line. To signal the end of the appended text, you type a "." on a line by itself. Control characters "f", "v", "l", and "k" work differently for "a" command than for "v". "a:" works as a one line append (i.e. anything following the colon is appended after the current line). To return to the command directory, type "hcomdir." See also: "hcc" (control characters) and "hc" (change). SHAR_EOF fi # end of overwriting check echo shar: extracting "'abt'" '(599 characters)' if test -f 'abt' then echo shar: will not over-write existing file "'abt'" else cat << \SHAR_EOF > 'abt' Abort character CTRL-F ("Funny Return") character is used to abort a "v" command before all the specified lines have been modified. Typing it causes the current line to be restored to its state of before the "v" command was begun, and causes a return to the editor's command level. Type "hv" for a description of the "v" command. Type "hrpt" for CTRL-F's meaning if in append or command mode. Type "htermchar" for info about other termination characters. SHAR_EOF fi # end of overwriting check echo shar: extracting "'ah'" '(142 characters)' if test -f 'ah' then echo shar: will not over-write existing file "'ah'" else cat << \SHAR_EOF > 'ah' If you're running Berkeley Unix, and you're bored Type the following command for something enjoyable: !rogue SHAR_EOF fi # end of overwriting check echo shar: extracting "'arg2'" '(917 characters)' if test -f 'arg2' then echo shar: will not over-write existing file "'arg2'" else cat << \SHAR_EOF > 'arg2' Arguments (cont) Once the terminal type is established, the remaining arg- uments are interpreted thus: if the argument begins with a "-", the rest of it is interpreted as though it appeared after the "o" in an option command. For example, an argument of "-w10" acts as a command "ow10". On the other hand, if the argument does not begin with "-", it is interpreted as a file name (path- name). The named file is read into the edit buffer, and its name becomes the remembered file name. If more than one file is named, the edit buffer will contain the contents of all the files. If an error is encountered while interpreting arguments (file not found, illegal option), the remainder will be ignored. For invoking command syntax, type "hargs". SHAR_EOF fi # end of overwriting check echo shar: extracting "'args'" '(425 characters)' if test -f 'args' then echo shar: will not over-write existing file "'args'" else cat << \SHAR_EOF > 'args' Argument Handling The syntax for 'se's invoking command is usually given as se {-