// BYREF is procedure-only.
FUNCTION Bad(BYREF X : INTEGER) RETURNS INTEGER
    RETURN X
ENDFUNCTION