let cvar _m vi =
    if vi.vglob && (get_array_length vi.vtype <> Nonethen Globals.define vi ;
    L0addr vi