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

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