The PASCAL compiler swapping option (*$S+*) should be used if the compile fails and trashes the system.
This option should be the first line of the text, preceding the program statement. Swapping MUST be used in compiling units. Please see page 91 of the Apple Pascal reference manual for further information.