8 lines
3.3 KiB
Plaintext
8 lines
3.3 KiB
Plaintext
XEROX SUPERPARENTHESES
|
||
2
|
||
|
||
4
|
||
|
||
1
|
||
|
||
SuperParentheses
|
||
1
|
||
|
||
4
|
||
|
||
By: Andrew J. Cameron, III (Cameron.pa@Xerox.com or cameron@cs.wisc.edu)
|
||
Most useful when used with: WHO-LINE (LispUsers)
|
||
This document last edited on Oct 19, 1987.
|
||
INTRODUCTION
|
||
This file, when loaded, creates a readtable (named "LISP[]") for use with CommonLisp which contain SuperParentheses, that is, the left square bracket (LEFTBRACKET syntax class) and right square bracket (RIGHTBRACKET syntax class) available in InterLisp. CommonLisp does not give these two characters their "usual" definitions, so as to allow users to easily give these character any macro/syntax definition they might desire.
|
||
This readtable will appear on, and can be selected via, the "Rdtbl" menu provided by the WHO-LINE LispUsers utility.
|
||
One can also access this new readtable with:
|
||
(IL:FIND-READTABLE "LISP[]")
|
||
These facilities obviate the need to store the readtable on a variable, as was done in an earlier version of this module.
|
||
|
||
INTERNALS
|
||
ÿÿ ïf ÿ The reading and writing of files using this readtable has not been tested or explored.
|
||
ÿÿ ïf ÿ SEdit is not too friendly to SuperParentheses.
|
||
ÿÿ ïf ÿ For more information, see Section 25.8.2 in both the IRM (InterLisp Reference Manual) and the Lyric Release Notes, and Section 22.1 in Steele (CommonLisp - The Language).
|
||
|
||
(LIST ((PAGE NIL (FOLIOINFO (ARABIC) STARTINGPAGE# 1) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF SLOPE REGULAR WEIGHT MEDIUM) FORMATINFO (ARABIC)) (174 36 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 444 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))) (PAGE NIL NIL (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF SLOPE REGULAR WEIGHT MEDIUM)) (282 42 72 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 444 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))) (PAGE NIL NIL (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF SLOPE REGULAR WEIGHT MEDIUM)) (282 42 72 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 444 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))))) . È È ( È ( Š Š8 ( Š Š8 D È È PAGEHEADING RUNNINGHEAD TERMINAL
|
||
MODERN
|
||
MODERN
|
||
MODERN MODERN LOGO HRULE.GETFN MODERN
|
||
HRULE.GETFN MODERN
|
||
HRULE.GETFN MODERN
|
||
HRULE.GETFN MODERN HRULE.GETFN MODERN J 1 * ¬ u - " z
|
||
Y 2 ® 3 <zº |