Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-05 - decus/20-0148/spell.scm
There is 1 other file named spell.scm in the archive. Click here to see a list.
File 1)	DSK:SPELL.MAC[4,576]	created: 1917 27-Feb-1981
File 2)	DSK:SPELL.OLD[4,576]	created: 1547 07-Dec-1980

1)1	;<DECUS.10-184>SPELL.WCC.2, 27-Feb-81 19:17:10, EDIT BY SST.D-BIGELOW
1)	;
1)	; Wesleyan University Edit History
1)	;
1)	;[W1]	Correct a bug that causes SPELL to require a dictionary to be loaded
1)	;	even when you're running an EXE file with one built in.  Areas
1)	;	affected: BEGIN0:.	[DHB 25-Feb-81]
1)	;
1)	; End WCC edit history
1)	;
1)	;SPELL.MAC[510,51]	Installed at NBS by MDA 790112
****
2)1	;SPELL.MAC[510,51]	Installed at NBS by MDA 790112
**************
1)1	;**;[W1] Remove one line at BEGIN0: + 0L
1)	BEGIN0:	OUTSTR	[ASCIZ/Do you want to augment the dictionary? /]
1)		INCHWL	A			;WAIT FOR ANSWER
****
2)1	BEGIN0:	PUSHJ	P,LOADER		;LOADING AUX
2)		OUTSTR	[ASCIZ/Do you want to augment the dictionary? /]
2)		INCHWL	A			;WAIT FOR ANSWER
**************
1)1	;**;[W1] Change one line and add one line at BEGIN0: + 4L
1)		CAIE	A,"Y"			;[W1]
1)		 JRST	BGIN02			;[W1] Answer is no, continue on
1)		PUSHJ	P,LOADER		;LOADING AUX
1)		JRST	BEGIN0			;OFF TO LOAD MORE.
****
2)1		CAIN	A,"Y"
2)		JRST	BEGIN0			;OFF TO LOAD MORE.
**************