Google
 
Trailing-Edge - PDP-10 Archives - decuslib10-06 - 43,50417/pascal.sav
There are no other files named pascal.sav in the archive.
h'd0!+x)=x+x-dph/|'g!"7@( R(7@( @(7@* N* 0d
 D* 06@(,!6@+	bX"(	b+ 1 D0 $= D*
&1d+>
&:l
&J	` 07J(+B
&Q,
&S
&S, $(,%7J(+F
&V,
&S
&X, $(,%7D*+K
&Q,
&S
&Y,4JNZ$(,Q*, $*,%
&[,n4LT
&o., 
"6@(
&r,!
&t,@1J" (1J+ (1J# (1J,"(4HT/(O@//* jn@@+7 O@+4H~ x ,1H ,l7@(+d
&x,1J,+n0J'+a
&{,
"@ZFP(
(3F+lL1Lr+g
&@

l
&		b	`
(1L0H+g
&+o
(@0L"1L2!$0L'1L7!$0L(1L8!$4DgPDP(@

l.404+}.&Q&A`+f
&+m@@(+n7J( 
,
",~7J( 
+7D* 
"[
,
" Z*,
" ,~@
 !
(1l1,7+1l=1,07/,1l-1, +/,`dpL+	@

(1,1,,~$*.*7h+
(0,0/* ,(1L
&n0L1L
(+&*QLx6@,[

x.,
",~4J@

)*.,
"+@ P(
&[`4D,9"4J&UJ,~1L
|p0+g
DISPATCH GENERATOR
IN THE FOLLOWING DIALOGUE, TYPE <CR> TO LEAVE A VALUE BLANK
DISPATCHER BUILT BY THE DISPATCH GENERATOR
IN THE FOLLOWING DIALOGUE, TYPE <CR> TO USE PRESET VALUE (IF ANY),
TYPE <ESC> TO CLEAR OUT AN EXISTING VALUE}xI
(BLANK VALUES WILL DEFAULT TO THE VALUE OF THE RUNNING PROGRAM):
PRESET TO RUN FROM  -- WHAT DEVICE OR ERSATZ AREA? PRESET TO RUN WHAT PROGRAM? WHAT PPN? w Z
DISPATCH CONTROL -- DO YOU WISH TO
 D - DISPATCH WITHOUT A MESSAGE
 W - WARN USER, THEN DISPATCH
 F - TYPE A FATAL ERROR MESSAGE, BUT STILL DISPATCH
 X - TYPE A FATAL MESSAGE AND ABORT
$/
CURRENTLY SET TO OPTION  WITH THIS MESSAGE:

WHICH OPTION DESIRED (D,W,F,X)? 3RETAIN OLD TEXT (Y,N)? 
TYPE TEXT OF MESSAGE (^D,^N,^P AS FLAGS, TERMINATE WITH <ESC>):

(
MESSAGE IS TOO LONG FOR THE BUFFER -- END OF MESSAGE FORCED NOW!

PROGRAM MAY NOW BE SAVED (GET AND REENTER TO CHECK SETTINGS)

WARNING MESSAGE MAY NOT HAVE LINES FLAGGED AS FATAL
INITIAL "?" WILL BE IGNORED

TOO MANY PARTS TO THE MESSAGE -- END OF MESSAGE FORCED NOW!
-.x H+0