$SAVE NOLIST rq$c$get$input$pathname: PROCEDURE( path$name$ptr, path$name$max, except$ptr ) EXTERNAL; DECLARE path$name$ptr POINTER, path$name$max WORD, except$ptr POINTER; END rq$c$get$input$pathname; $RESTORE