%FOREIGN DEFINITION MODULE VMSRTL; (* Set up procedure stubs for interfaceing with the VMS run time library routines. *) EXPORT QUALIFIED Lib$Get_Foreign; PROCEDURE Lib$Get_Foreign( VAR %STDESCR Command : ARRAY OF CHAR (* out *); %STDESCR Prompt : ARRAY OF CHAR (* in *); VAR %REF CmdLen : INTEGER (* out *) ): INTEGER; END VMSRTL.