diff options
Diffstat (limited to 'misc/pascal/tests/src/007-function.pas')
-rw-r--r-- | misc/pascal/tests/src/007-function.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/misc/pascal/tests/src/007-function.pas b/misc/pascal/tests/src/007-function.pas index 0738db989..4c5a3c75d 100644 --- a/misc/pascal/tests/src/007-function.pas +++ b/misc/pascal/tests/src/007-function.pas @@ -8,7 +8,7 @@ function addmul(term1a, term1b, term2a, term2b: integer ) : integer; factor := terma + termb;
end;
begin
- addmul := factor(term1a, term1b) + factor(term2a, term2b);
+ addmul := factor(term1a, term1b) * factor(term2a, term2b);
end;
begin
|