Google
 

Trailing-Edge - PDP-10 Archives - decuslib10-11 - 43,50527/ckmail.bli
There are no other files named ckmail.bli in the archive.
Module Ckmail(Stack,Version=1(1)-2,Reserve(1,2,3,4))=
Begin
	Require Machop.bli;
	Require Macros.bli;

Own Runblk[6];

ac1<lefthalf> _ 1;
ac1<righthalf>_address(runblk[0]);

runblk[0] _ sixbit'SYS';
runblk[1] _ sixbit'MAILER';
runblk[2]_runblk[3]_runblk[4]_runblk[5]_0;

run(ac1);

Print('?M?J?G??CKMCRM Unable to run SYS:MAILER?M?J');
Stop;

end;