aboutsummaryrefslogtreecommitdiff
path: root/tests/iii/multifile-default-return/second.cps
blob: 70b46674256e7f1fedb1bbee6d71ee54498ca1b1 (plain)
1
2
3

OVERLOAD FUNCTION Pick(X : INTEGER) RETURNS DEFAULT REAL
    RETURN 2.0
ENDFUNCTION