Overview
Comment:Fix for bug [553524] #define PI causes parse error.
Only substitutes for PI if it is not a number. This prevents Reduce from
trying to substitute for 3.14... when "on rounded" has been set.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 5955810cefbb62d7de13aabb05e908c1436b95a5555743c7c691fd65cdaae9a7
User & Date: geraint@users.sourceforge.net on 2002-05-27 10:36:21
Other Links: branch diff | manifest | tags
Context
2002-05-27
13:19:09
Added "#include <math.h>". check-in: 1d4f30f139 user: geraint@users.sourceforge.net tags: origin/master, trunk
10:36:21
Fix for bug [553524] #define PI causes parse error.
Only substitutes for PI if it is not a number. This prevents Reduce from
trying to substitute for 3.14... when "on rounded" has been set.
check-in: 5955810cef user: geraint@users.sourceforge.net tags: origin/master, trunk
2002-05-26
17:28:27
Tweaked figures again check-in: be0199de5d user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/lib/reduce/fix_c.r from [0b3202721a] to [551406cfe8].

1
2
3

4
5
6
7
8
9
10
11
%% Fixes for c-code generation

%% Set PI explicitly here to avoid later conflict with cc headers

LET PI = 3.1415$

ON ROUNDED$ % No integer output

%% Changes x^y to pow(x,y)
 OPERATOR pow$
 FOR ALL x,y LET x^y = pow(x,y)$ % Use the pow function
 



>
|







1
2
3
4
5
6
7
8
9
10
11
12
%% Fixes for c-code generation

%% Set PI explicitly here to avoid later conflict with cc headers
%% if PI is not already a number (i.e. on rounded has not been set)
IF NOT NUMBERP (pi) THEN LET PI = 3.14159$

ON ROUNDED$ % No integer output

%% Changes x^y to pow(x,y)
 OPERATOR pow$
 FOR ALL x,y LET x^y = pow(x,y)$ % Use the pow function
 


MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]