This file documents possible modifications to SHRDLU to get
it running correctly. I keep SHRDLU on this system in it's
original state, however sometimes I change things temporarily
to compare the results against my version.

	Status on LK ITS:

	Partially working. Gets until READY and parses
	'Pick up the big red block .' correcty. However,
	it won't pick up, because DATA > does not get
	read in correctly.

To test my changes, supdup to my console location or lmr.prout.be and
cwd to shrdlu. Do ':lisp init' and pray. At some point it drops you
to command mode (prompt '>>>'). Type '(shrdlu)' and try your luck.

Of course you are free to fix it if you know how to do that. Help
is appreciated.

*** General corrections ***

It is important that you escape the following chars:   " # ,
To do so, prepend them by /. For example, if it reads (eq char '"),
you have to change that to (eq char '/" ).

If Maclisp stops with 'FILE-IN-|foo|EOF while in READ', there is some
" sign which is not escaped.

Then you need to define CHRCT somewhere. I'm not really sure what this
is used for, but it seems this tells SHRDLU how many columns your term-
inal has. So do (setq chrct 80.) somewhere before (shrdlu).

Somewhere it calls (ioc g) to output ^g. You can define some dummy function
to get it to work, like (defun ioc (x) (print (ascii 7.))).

-- SV:LOKI;SHRDLU NOTES     08-FEB-10 11:06