#COMPILE EXE
#DIM ALL

FUNCTION PBMAIN() AS LONG
    BRIDGE IMPORT shared_count AS QUAD ALIAS "SHARED-COUNT"
    PRINT shared_count
    shared_count = 42
    PRINT shared_count
    FUNCTION = 0
END FUNCTION
