seer/tests/helloada/increment_by.adb at 12a00ec89f9b1e559b239f6e810c32e1dd5d8bde - seer - Gitea: Git with a cup of tea

saberbud/seer

mirror of https://github.com/epasveer/seer.git synced 2026-08-30 00:50:42 +08:00

Files

T

Ernie Pasveer d13a5af72a Add calling of a subprograms (soubroutines) to the Ada test program.

2023-05-08 20:44:46 -05:00

7 lines

132 B

Ada

Raw Blame History

 function Increment_By
   (I    : Integer := 0;
    Incr : Integer := 1) return Integer is
 begin
    return I + Incr;
 end Increment_By;