NAME
    GetProgramName -- Returns the current program name (V36)
SYNOPSIS
    success = GetProgramName(buf, len)
    D0                       D1   D2
    BOOL GetProgramName(STRPTR, LONG)
FUNCTION
    Extracts the program name from the CLI structure and puts it
    into the buffer.  If the buffer is too small, the name is truncated
    present, a null string is returned in the buffer, and failure from
    the call (with ioerr() == error_object_wrong_type);
INPUTS
    buf     - Buffer to hold extracted name
    len     - Number of bytes of space in buffer
RESULT
    success - Success/failure indicator
SEE ALSO
    setprogramname()