$ABS@CLVMS.BITNET (Art Stine) (08/14/86)
The problem is that the CONTEXT parameter cannot be a constant, as it
expects to be able to modify it. The correct program should look like:
C TEST OF LIB$FIND_FILE.
CHARACTER*255 EXP
CHARACTER*255 SPEC
INTEGER LIB$FIND_FILE,context
SPEC = '*.CHR'
IDUMMY = LIB$FIND_FILE(SPEC,EXP,context)
PRINT *,EXP(1:78)
STOP
END
Art Stine
Systems Programmer
Clarkson University
BITNET: $ABS@CLVMS