$set ver
$on warning then continue
$tangle crudetype                ! ignore warning messages
$pas/opt crudetype
$link/notrace crudetype
$del/nolog crudetype.obj;*
$del/nolog crudetype.pas;*
$set nover