From 97efe4ad4c41971345dd2d494da4d05e2ecac55e Mon Sep 17 00:00:00 2001 From: patacongo Date: Wed, 6 Feb 2008 23:43:05 +0000 Subject: 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 --- misc/pascal/tests/src/007-function.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'misc/pascal/tests/src') 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 -- cgit v1.2.3