fgl_arch() returns a char(n) value, which shows the architecture that the compiled binary is running on:
MAIN
DEFINE str STRING
LET str = "This system architecture is: \n" , fgl_arch(), "\n Possible values are:\n nt = Windows\n lnx = Linux\n sun = Sun\n hp = HP-Unix"
CALL fgl_winmessage("System Architecture",str clipped,"info")
END MAIN