Guardian Procedure Calls Reference Manual

Examples
On system number 6, execution of:
FNAME1 ':=' [ "$TERM1" , 9 * [ " "] ];
FNAME2 ':=' [ %56006 , "TERM1 " , 8 * [ " "] ];
! "\ , "TERM1";
STATUS := FNAMECOMPARE ( FNAME1 , FNAME2 );
returns a 0 in STATUS.
On other systems, execution of the example returns a status of -1.
Whether a system is a network node or not, execution of:
FNAME1 ':=' [ "$SERVR #START UPDATING" ];
FNAME2 ':=' [ "$SERVR #FINISH UPDATING" ];
STATUS := FNAMECOMPARE ( FNAME1 , FNAME2 );
returns a status of +1.
In any system, execution of:
FNAME1 ':=' [ "$0013 ", 9 * [ " "] ];
FNAME2 ':=' [ "$DATAX", 9 * [ " "] ];
STATUS := FNAMECOMPARE ( FNAME1 , FNAME2 );
returns a status of 0 if the device name $DATAX is defined as logical device number 13 at SYSGEN
time; in all other cases, it returns a status of -1.
FNAMECOMPARE Procedure (Superseded by FILENAME_COMPARE_ Procedure) 617