1
0
mirror of synced 2026-01-13 23:47:27 +00:00

minor cleanup; empty bin directory of old binaries

This commit is contained in:
Larry Masinter 2020-12-10 18:45:42 -08:00
parent 01491ff031
commit f5961c9847
54 changed files with 37 additions and 259 deletions

Binary file not shown.

Binary file not shown.

Binary file not shown.

BIN
bin/lde

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

BIN
bin/ldex

Binary file not shown.

View File

@ -1,217 +0,0 @@
#! /bin/csh -f
#
# Run Medley
#
# Syntax: medley [-nogreet][-xns][-noxns] [-geometry pixelgeometry] [-display xdisplay-device]
# [-raw] [-t xtimeout][-prog executable-program] [-vmem savevmemfilename] |
# [-m memorylimit] [-kbd keyboardtype] [-key key]
# [sysoutfilename | -lfg | -lisp | -full | -xlfg
# -{name of any sysout on the public sysout directory} ]
#
# -xns means leave unix xns running
# -noxns means suppress Lisp xns.
onintr cleanup
limit coredumpsize 0
setenv HOSTNAME `hostname`
setenv OSVERSION `uname -r`
\
# Directory variables are accessible from Lisp via UNIX-GETENV
# Shell should set MEDLEYDIR to point to the Medley3.5 directory
setenv lispcore $MEDLEYDIR/lispcore
setenv LDEINIT "$lispcore/greetfiles/local-init.lcom"
set mem="-m 256" # Default, has to be set
#set geometry="-g 1060x790"
# MBA screensize
set geometry="-g 1440x900"
setenv LDEKBDTYPE x
set ICONSPEC=" "
setenv LDEFILETIMEOUT 60
setenv TAKEXNSDOWN 0
setenv LDELISPXNS 0
#default is no lispxns
if ($#argv != 0) then
while ("$1" != "")
switch ($1)
case "-m":
set mem="-m $2"
shift
breaksw
case "-makefull":
setenv LDEINIT $lispcore/makesysout/makefullsysout.lcom
setenv LOADUPDIR $lispcore
case "-xlisp":
setenv LDESRCESYSOUT "$lispcore/loadups/xlisp.sysout"
breaksw
case "-venuelisp":
case "-lisp":
setenv LDESRCESYSOUT "$lispcore/loadups/lisp.venuesysout"
breaksw
case "-venuefull":
setenv LDESRCESYSOUT "$lispcore/full.venuesysout"
breaksw
case "-makelfg":
setenv LDEINIT $lfghome/parser/makelfgsysout.lcom
setenv LOADUPDIR $lfghome/parser
case "-xfull":
setenv LDESRCESYSOUT "$lispcore/loadups/xfull35.sysout"
breaksw
case "-lfg":
case "-lfg35":
setenv LDESRCESYSOUT "$lfghome/parser/release/lfg.sysout"
set ICONSPEC = "-iconbitmap $lfghome/release/lfg.xbm -icontitle Xerox"
breaksw
case "-oldlfg":
setenv LDESRCESYSOUT "$lfghome/parser/oldrelease/lfg35.sysout"
set ICONSPEC = "-iconbitmap $lfghome/release/lfg.xbm -icontitle Xerox"
breaksw
case "-xlfg35":
case "-xlfg":
setenv LDESRCESYSOUT "$lfghome/parser/xlfg35.sysout"
set ICONSPEC = "-iconbitmap $lfghome/release/lfg.xbm -icontitle Xerox"
breaksw
case "-makelisp":
setenv LDEINIT $lispcore/makesysout/synclispfiles.lcom
setenv LOADUPDIR $lispcore
setenv LDESRCESYSOUT "$lispcore/loadups/lisp.venuesysout"
breaksw
case "-xlisp":
setenv LDESRCESYSOUT "$lispcore/loadups/xlisp.sysout"
breaksw
case "-makeinit":
setenv LDESRCESYSOUT "$MEDLEYDIR/basics/next/INIT.DLINIT"
setenv LDEINIT ""
breaksw
case "-nogreet":
setenv LDEINIT ""
breaksw
case "-greet":
setenv LDEINIT "$2"
shift
breaksw
case "-xns":
setenv TAKEXNSDOWN 1
setenv LDELISPXNS 1
breaksw
case "-noxns":
setenv TAKEXNSDOWN 0
setenv LDELISPXNS 0
breaksw
case "-raw":
unsetenv DISPLAY
breaksw
case "-geometry":
set geometry="-g $2"
shift
breaksw
case "-display":
setenv DISPLAY $2
shift
breaksw
case "-t":
set xtimeout=$2
shift
breaksw
case "-prog":
set progparam=$2
shift
breaksw
case "-vmem":
setenv LDEDESTSYSOUT $2
shift
breaksw
case "-kbd":
setenv LDEKBDTYPE $2
shift
breaksw
default:
if (`expr index "$1" "[-]"` == 1) then
# public sysout name
set name=`expr substr $1 2 999`
setenv LDESRCESYSOUT "$MEDLEYDIR/basics/${name}.sysout"
else # not an option so must be a private sysout name
setenv LDESRCESYSOUT $1
endif
breaksw
endsw
shift
end
else
# no options specified
endif
if ($?LDEDESTSYSOUT) then
else if (-f /$HOSTNAME/$LOGNAME/lisp.virtualmem) then
setenv LDEDESTSYSOUT /$HOSTNAME/$LOGNAME/lisp.virtualmem
else if (-f ~/lisp.virtualmem) then
setenv LDEDESTSYSOUT ~/lisp.virtualmem
else if (-d /$HOSTNAME/$LOGNAME) then
setenv LDEDESTSYSOUT /$HOSTNAME/$LOGNAME/lisp.virtualmem
endif
if (! $?LDESRCESYSOUT) then
setenv LDESRCESYSOUT $LDEDESTSYSOUT
endif
if (! $?LDEKBDTYPE) then
# switch (`/usr/bin/hostinfo keyboardtype`)
# endsw
endif
echo "keyboard type is " $LDEKBDTYPE
#set hostid = `hostid`
setenv INMEDLEY 1
echo "sysout is " $LDESRCESYSOUT
#set version = `medley-lisp-version $LDESRCESYSOUT`
set version = "35010"
if ($status) exit
if ($LDELISPXNS) then
set prog="ldeether"
else
set prog="lde"
echo "running without xns protocols"
endif
switch ("$version")
case "35000":
set version = "3.5"
breaksw
case "35010":
set version = "3.501"
breaksw
default:
set version = "3.5"
endsw
echo "using emulator version $version"
switch ("$version")
case "3.5":
case "3.501":
set path = ($lispcore/bin/ $path)
# if ${?DISPLAY} then # we are running under X
$prog $mem $geometry $ICONSPEC
# else $prog $mem
endif
breaksw
endsw
#
# Now we are done, so clean up after ourselves
#
cleanup:
if ${?DISPLAY} then
# do X cleanup
else
# reset
endif
#clear ; this obscures error messages

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

File diff suppressed because one or more lines are too long

Binary file not shown.

View File

@ -1,178 +1,178 @@
Synchronizing Lisp sysout at 6-Dec-2020 00:07:35
Synchronizing Lisp sysout at 10-Dec-2020 18:36:47
{DSK}<home>larry>ilisp>medley>makesysout>SYNCLISPFILES.;53
created 6-Dec-2020 00:06:51
{DSK}<home>larry>ilisp>medley>sources>FASLOAD.DFASL;1
{DSK}<Users>larry>Desktop>medley>sources>FASLOAD.DFASL;1
XCL Compiler output for source file {DSK}<Users>kaplan>Local>medley3.5>lispcore>sources>FASLOAD.;2
Source file created Tuesday, 17 April 2018, 7:55:20.
FASL file created Tuesday, 17 April 2018, 8:09:14.
{DSK}<home>larry>ilisp>medley>sources>FONT.LCOM;7
{DSK}<Users>larry>Desktop>medley>sources>FONT.LCOM;7
compiled on 28-Jun-99 16:29:55
File created 28-Jun-99 16:29:49
{DSK}<home>larry>ilisp>medley>sources>UFSCALLC.LCOM;4
{DSK}<Users>larry>Desktop>medley>sources>UFSCALLC.LCOM;4
compiled on 18-May-2018 12:53:18
File created 18-May-2018 12:53:00
UFSCALLCCOMS
{DSK}<home>larry>ilisp>medley>sources>UFS.LCOM;4
{DSK}<Users>larry>Desktop>medley>sources>UFS.LCOM;4
compiled on 18-May-2018 09:20:25
File created 31-Dec-2000 12:38:40
UFSCOMS
{DSK}<home>larry>ilisp>medley>sources>APRINT.LCOM;3
{DSK}<Users>larry>Desktop>medley>sources>APRINT.LCOM;3
compiled on 17-Jan-2020 05:51:20
File created 17-Jan-2020 05:51:20
APRINTCOMS
{DSK}<home>larry>ilisp>medley>sources>PMAP.LCOM;4
{DSK}<Users>larry>Desktop>medley>sources>PMAP.LCOM;4
compiled on 18-May-2018 09:21:40
File created 3-Feb-2002 14:11:02
PMAPCOMS
{DSK}<home>larry>ilisp>medley>sources>ADIR.LCOM;8
{DSK}<Users>larry>Desktop>medley>sources>ADIR.LCOM;8
compiled on 14-Oct-2020 11:14:41
File created 14-Oct-2020 11:14:03
ADIRCOMS
{DSK}<home>larry>ilisp>medley>sources>COREIO.LCOM;3
{DSK}<Users>larry>Desktop>medley>sources>COREIO.LCOM;3
compiled on 4-Oct-2018 14:13:06
File created 4-Oct-2018 14:13:06
COREIOCOMS
{DSK}<home>larry>ilisp>medley>sources>ACODE.LCOM;7
{DSK}<Users>larry>Desktop>medley>sources>ACODE.LCOM;7
compiled on 25-Jun-2017 22:38:30
File created 25-Jun-2017 22:35:00
ACODECOMS
{DSK}<home>larry>ilisp>medley>sources>IOCHAR.LCOM;11
{DSK}<Users>larry>Desktop>medley>sources>IOCHAR.LCOM;11
compiled on 10-Aug-2020 21:44:38
File created 10-Aug-2020 21:44:38
{DSK}<home>larry>ilisp>medley>sources>LLDATATYPE.LCOM;1
{DSK}<Users>larry>Desktop>medley>sources>LLDATATYPE.LCOM;1
compiled on 28-Jun-99 16:57:53
File created 28-Jun-99 16:57:50
{DSK}<home>larry>ilisp>medley>sources>LLCHAR.LCOM;3
{DSK}<Users>larry>Desktop>medley>sources>LLCHAR.LCOM;3
compiled on 11-Nov-2018 13:08:05
File created 11-Nov-2018 13:08:04
{DSK}<home>larry>ilisp>medley>sources>FILEIO.LCOM;13
{DSK}<Users>larry>Desktop>medley>sources>FILEIO.LCOM;13
compiled on 13-Aug-2020 11:43:08
File created 13-Aug-2020 11:43:08
FILEIOCOMS
{DSK}<home>larry>ilisp>medley>sources>PRETTY.LCOM;7
{DSK}<Users>larry>Desktop>medley>sources>PRETTY.LCOM;7
compiled on 16-Apr-2018 21:37:10
File created 16-Apr-2018 21:37:09
PRETTYCOMS
{DSK}<home>larry>ilisp>medley>sources>NEWPRINTDEF.LCOM;3
{DSK}<Users>larry>Desktop>medley>sources>NEWPRINTDEF.LCOM;3
compiled on 31-Dec-2000 11:53:35
File created 31-Dec-2000 11:53:33
NEWPRINTDEFCOMS
{DSK}<home>larry>ilisp>medley>sources>FONTPROFILE.LCOM;3
{DSK}<Users>larry>Desktop>medley>sources>FONTPROFILE.LCOM;3
compiled on 14-May-2018 00:04:35
File created 28-Jun-99 22:10:46
FONTPROFILECOMS
{DSK}<home>larry>ilisp>medley>sources>PRINTFN.LCOM;5
{DSK}<Users>larry>Desktop>medley>sources>PRINTFN.LCOM;5
compiled on 16-Apr-2018 21:40:32
File created 16-Apr-2018 21:40:32
PRINTFNCOMS
{DSK}<home>larry>ilisp>medley>sources>LOADFNS.LCOM;11
{DSK}<Users>larry>Desktop>medley>sources>LOADFNS.LCOM;11
compiled on 16-Apr-2018 17:38:16
File created 16-Apr-2018 17:38:16
LOADFNSCOMS
{DSK}<home>larry>ilisp>medley>sources>FILEPKG.LCOM;14
{DSK}<Users>larry>Desktop>medley>sources>FILEPKG.LCOM;14
compiled on 27-Oct-2020 15:40:33
File created 27-Oct-2020 15:40:32
FILEPKGCOMS
{DSK}<home>larry>ilisp>medley>sources>ASKUSER.LCOM;6
{DSK}<Users>larry>Desktop>medley>sources>ASKUSER.LCOM;6
compiled on 10-Aug-2020 21:18:50
File created 10-Aug-2020 21:18:50
ASKUSERCOMS
{DSK}<home>larry>ilisp>medley>sources>CMLMODULES.DFASL;5
{DSK}<Users>larry>Desktop>medley>sources>CMLMODULES.DFASL;5
XCL Compiler output for source file {DSK}<Users>kaplan>Local>medley3.5>lispcore>sources>CMLMODULES.;2
Source file created Monday, 16 April 2018, 22:46:19.
FASL file created Monday, 16 April 2018, 22:46:19.
{DSK}<home>larry>ilisp>medley>sources>LOGOW.DFASL;1
{DSK}<Users>larry>Desktop>medley>sources>LOGOW.DFASL;1
XCL Compiler output for source file {DSK}<tilde>sybalsky>lispcore>sources>LOGOW.;2
Source file created Sunday, 9 April 2000, 18:08:24.
FASL file created Sunday, 9 April 2000, 18:08:25.
{DSK}<home>larry>ilisp>medley>sources>DEXEC.LCOM;13
{DSK}<Users>larry>Desktop>medley>sources>DEXEC.LCOM;13
compiled on 13-Aug-2020 12:36:18
File created 13-Aug-2020 12:36:18
{DSK}<home>larry>ilisp>medley>sources>INSPECT.LCOM;8
{DSK}<Users>larry>Desktop>medley>sources>INSPECT.LCOM;8
compiled on 21-Apr-2018 08:08:07
File created 21-Apr-2018 08:08:07
INSPECTCOMS
{DSK}<home>larry>ilisp>medley>sources>TWODINSPECTOR.LCOM;2
{DSK}<Users>larry>Desktop>medley>sources>TWODINSPECTOR.LCOM;2
compiled on 11-Aug-2020 11:22:31
File created 11-Aug-2020 11:22:30
TWODINSPECTORCOMS
{DSK}<home>larry>ilisp>medley>sources>XCLC-TOP-LEVEL.DFASL;10
{DSK}<Users>larry>Desktop>medley>sources>XCLC-TOP-LEVEL.DFASL;10
XCL Compiler output for source file {DSK}<Users>kaplan>Local>medley3.5>lispcore>sources>XCLC-TOP-LEVEL.;10
Source file created 19-Sep-2020 22:02:59
FASL file created Saturday, 19 September 2020, 22:02:59
{DSK}<home>larry>ilisp>medley>sources>HARDCOPY.LCOM;7
{DSK}<Users>larry>Desktop>medley>sources>HARDCOPY.LCOM;7
compiled on 16-Apr-2018 22:15:08
File created 16-Apr-2018 22:15:08
HARDCOPYCOMS
{DSK}<home>larry>ilisp>medley>sources>INTERPRESS.LCOM;7
{DSK}<Users>larry>Desktop>medley>sources>INTERPRESS.LCOM;7
compiled on 16-Apr-2018 21:56:38
File created 16-Apr-2018 21:56:38
INTERPRESSCOMS
{DSK}<home>larry>ilisp>medley>sources>SEDIT-COMMANDS.DFASL;4
{DSK}<Users>larry>Desktop>medley>sources>SEDIT-COMMANDS.DFASL;4
XCL Compiler output for source file {DSK}<Users>kaplan>Local>medley3.5>lispcore>sources>SEDIT-COMMANDS.;3
Source file created Monday, 23 April 2018, 18:12:52.
FASL file created Monday, 23 April 2018, 18:13:51.
{DSK}<home>larry>ilisp>medley>sources>SEDIT-WINDOW.DFASL;3
{DSK}<Users>larry>Desktop>medley>sources>SEDIT-WINDOW.DFASL;3
XCL Compiler output for source file {DSK}<Users>kaplan>Local>medley3.5>lispcore>sources>SEDIT-WINDOW.;2
Source file created Monday, 14 May 2018, 14:12:02.
FASL file created Monday, 14 May 2018, 14:12:02.
{DSK}<home>larry>ilisp>medley>sources>TIME.LCOM;5
{DSK}<Users>larry>Desktop>medley>sources>TIME.LCOM;5
compiled on 16-Apr-2018 23:05:17
File created 16-Apr-2018 23:05:10
30 files loaded
{DSK}<home>larry>ilisp>medley>patches>LLREADPATCH.LCOM;6
{DSK}<USERS>LARRY>DESKTOP>MEDLEY>PATCHES>LLREADPATCH.LCOM;6
compiled on 1-Aug-2020 18:52:48
File created 1-Aug-2020 18:52:48
LLREADPATCHCOMS
{DSK}<home>larry>ilisp>medley>patches>MACHINEINDEPENDENTPATCH.LCOM;3
{DSK}<USERS>LARRY>DESKTOP>MEDLEY>PATCHES>MACHINEINDEPENDENTPATCH.LCOM;3
compiled on 19-Sep-2020 21:18:45
File created 19-Sep-2020 20:56:09
MACHINEINDEPENDENTPATCHCOMS
{DSK}<home>larry>ilisp>medley>patches>NOXNSPATCH.LCOM;1
{DSK}<USERS>LARRY>DESKTOP>MEDLEY>PATCHES>NOXNSPATCH.LCOM;1
compiled on 31-Mar-99 17:08:42
File created 31-Mar-99 17:08:40
NOXNSPATCHCOMS
@ -180,4 +180,4 @@ NOXNSPATCHCOMS
3 files loaded
Creating updated LISP sysout on
{DSK}<home>larry>ilisp>medley>loadups>xlisp.sysout;10
{DSK}<Users>larry>Desktop>medley>loadups>xlisp.sysout;6

Binary file not shown.

Binary file not shown.

Binary file not shown.

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

0
makesysout/loadup-full.sh Normal file → Executable file
View File

0
makesysout/loadup-lisp.sh Normal file → Executable file
View File