diff options
author | patacongo <patacongo@42af7a65-404d-4744-a932-0658087f49c3> | 2008-02-06 23:43:05 +0000 |
---|---|---|
committer | patacongo <patacongo@42af7a65-404d-4744-a932-0658087f49c3> | 2008-02-06 23:43:05 +0000 |
commit | 97efe4ad4c41971345dd2d494da4d05e2ecac55e (patch) | |
tree | 3ef0a874278eb608dd73e70a9e47c5d8472c73d5 /misc/pascal/tests | |
parent | 90c80ebe9780d73ac73f4269ba9d5c9b55d4e6d8 (diff) | |
download | nuttx-97efe4ad4c41971345dd2d494da4d05e2ecac55e.tar.gz nuttx-97efe4ad4c41971345dd2d494da4d05e2ecac55e.tar.bz2 nuttx-97efe4ad4c41971345dd2d494da4d05e2ecac55e.zip |
Break big case statement into smaller case statements
git-svn-id: svn://svn.code.sf.net/p/nuttx/code/trunk@645 42af7a65-404d-4744-a932-0658087f49c3
Diffstat (limited to 'misc/pascal/tests')
-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
|