//  Make TEST sysout from <Lisp>@CurrentRelease.name@>Basics>FULL.  At start, must be logged in with read access to <Lisp>
copy init.save _ init.lisp
FTP Eris Dir/c Lisp>Current ret/S>A CurrentRelease.name ThisRelease.name 
FTP QV DIR/C <IDL>CM> RET/C MAKETESTFROMFULL.CONTENTS
@MAKETESTFROMFULL.CONTENTS@