; Compile mided in production version, with no debug tables ; And with reentrant high segment .r setsrc *a dskb,* * .r simula *dskb:=dskd:sscan(-d-i-a-qy) *dskb:=dskd:termty(-d-i-a-qy) *dskb:=dskd:mmista(-d-i-a-qy) *dskb:=dskd:mided1(-d-i-a-qy) *dskb:=dskd:mided2(-d-i-a-qy) *dskb:=dskd:mided3(-d-i-a-qy) *dskb:=dskd:midedb(-d-i-a-qy) .do vilink