/*
|
/*
|
*************************************************************************
|
*************************************************************************
|
*
|
*
|
* "DHRYSTONE" Benchmark Program
|
* "DHRYSTONE" Benchmark Program
|
* -----------------------------
|
* -----------------------------
|
*
|
*
|
* Version: C, Version 2.1
|
* Version: C, Version 2.1
|
*
|
*
|
* File: dhry.h (part 1 of 3)
|
* File: dhry.h (part 1 of 3)
|
*
|
*
|
* Date: May 25, 1988
|
* Date: May 25, 1988
|
*
|
*
|
* Author: Reinhold P. Weicker
|
* Author: Reinhold P. Weicker
|
* Siemens Nixdorf Inf. Syst.
|
* Siemens Nixdorf Inf. Syst.
|
* STM OS 32
|
* STM OS 32
|
* Otto-Hahn-Ring 6
|
* Otto-Hahn-Ring 6
|
* W-8000 Muenchen 83
|
* W-8000 Muenchen 83
|
* Germany
|
* Germany
|
* Phone: [+49]-89-636-42436
|
* Phone: [+49]-89-636-42436
|
* (8-17 Central European Time)
|
* (8-17 Central European Time)
|
* UUCP: weicker@ztivax.uucp@unido.uucp
|
* UUCP: weicker@ztivax.uucp@unido.uucp
|
* Internet: weicker@ztivax.siemens.com
|
* Internet: weicker@ztivax.siemens.com
|
*
|
*
|
* Original Version (in Ada) published in
|
* Original Version (in Ada) published in
|
* "Communications of the ACM" vol. 27., no. 10 (Oct. 1984),
|
* "Communications of the ACM" vol. 27., no. 10 (Oct. 1984),
|
* pp. 1013 - 1030, together with the statistics
|
* pp. 1013 - 1030, together with the statistics
|
* on which the distribution of statements etc. is based.
|
* on which the distribution of statements etc. is based.
|
*
|
*
|
* In this C version, the following C library functions are
|
* In this C version, the following C library functions are
|
* used:
|
* used:
|
* - strcpy, strcmp (inside the measurement loop)
|
* - strcpy, strcmp (inside the measurement loop)
|
* - printf, scanf (outside the measurement loop)
|
* - printf, scanf (outside the measurement loop)
|
*
|
*
|
* Collection of Results:
|
* Collection of Results:
|
* Reinhold Weicker (address see above) and
|
* Reinhold Weicker (address see above) and
|
*
|
*
|
* Rick Richardson
|
* Rick Richardson
|
* PC Research. Inc.
|
* PC Research. Inc.
|
* 94 Apple Orchard Drive
|
* 94 Apple Orchard Drive
|
* Tinton Falls, NJ 07724
|
* Tinton Falls, NJ 07724
|
* Phone: (201) 834-1378 (9-17 EST)
|
* Phone: (201) 834-1378 (9-17 EST)
|
* UUCP: ...!uunet!pcrat!rick
|
* UUCP: ...!uunet!pcrat!rick
|
*
|
*
|
* Please send results to Rick Richardson and/or Reinhold Weicker.
|
* Please send results to Rick Richardson and/or Reinhold Weicker.
|
* Complete information should be given on hardware and software
|
* Complete information should be given on hardware and software
|
* used. Hardware information includes: Machine type, CPU, type and
|
* used. Hardware information includes: Machine type, CPU, type and
|
* size of caches; for microprocessors: clock frequency, memory speed
|
* size of caches; for microprocessors: clock frequency, memory speed
|
* (number of wait states). Software information includes: Compiler
|
* (number of wait states). Software information includes: Compiler
|
* (and runtime library) manufacturer and version, compilation
|
* (and runtime library) manufacturer and version, compilation
|
* switches, OS version. The Operating System version may give an
|
* switches, OS version. The Operating System version may give an
|
* indication about the compiler; Dhrystone itself performs no OS
|
* indication about the compiler; Dhrystone itself performs no OS
|
* calls in the measurement loop.
|
* calls in the measurement loop.
|
*
|
*
|
* The complete output generated by the program should be mailed
|
* The complete output generated by the program should be mailed
|
* such that at least some checks for correctness can be made.
|
* such that at least some checks for correctness can be made.
|
*
|
*
|
*************************************************************************
|
*************************************************************************
|
*
|
*
|
* History: This version C/2.1 has been made for two reasons:
|
* History: This version C/2.1 has been made for two reasons:
|
*
|
*
|
* 1) There is an obvious need for a common C version of
|
* 1) There is an obvious need for a common C version of
|
* Dhrystone, since C is at present the most popular system
|
* Dhrystone, since C is at present the most popular system
|
* programming language for the class of processors
|
* programming language for the class of processors
|
* (microcomputers, minicomputers) where Dhrystone is used
|
* (microcomputers, minicomputers) where Dhrystone is used
|
* most. There should be, as far as possible, only one C
|
* most. There should be, as far as possible, only one C
|
* version of Dhrystone such that results can be compared
|
* version of Dhrystone such that results can be compared
|
* without restrictions. In the past, the C versions
|
* without restrictions. In the past, the C versions
|
* distributed by Rick Richardson (Version 1.1) and by
|
* distributed by Rick Richardson (Version 1.1) and by
|
* Reinhold Weicker had small (though not significant)
|
* Reinhold Weicker had small (though not significant)
|
* differences.
|
* differences.
|
*
|
*
|
* 2) As far as it is possible without changes to the
|
* 2) As far as it is possible without changes to the
|
* Dhrystone statistics, optimizing compilers should be
|
* Dhrystone statistics, optimizing compilers should be
|
* prevented from removing significant statements.
|
* prevented from removing significant statements.
|
*
|
*
|
* This C version has been developed in cooperation with
|
* This C version has been developed in cooperation with
|
* Rick Richardson (Tinton Falls, NJ), it incorporates many
|
* Rick Richardson (Tinton Falls, NJ), it incorporates many
|
* ideas from the "Version 1.1" distributed previously by
|
* ideas from the "Version 1.1" distributed previously by
|
* him over the UNIX network Usenet.
|
* him over the UNIX network Usenet.
|
* I also thank Chaim Benedelac (National Semiconductor),
|
* I also thank Chaim Benedelac (National Semiconductor),
|
* David Ditzel (SUN), Earl Killian and John Mashey (MIPS),
|
* David Ditzel (SUN), Earl Killian and John Mashey (MIPS),
|
* Alan Smith and Rafael Saavedra-Barrera (UC at Berkeley)
|
* Alan Smith and Rafael Saavedra-Barrera (UC at Berkeley)
|
* for their help with comments on earlier versions of the
|
* for their help with comments on earlier versions of the
|
* benchmark.
|
* benchmark.
|
*
|
*
|
* Changes: In the initialization part, this version follows mostly
|
* Changes: In the initialization part, this version follows mostly
|
* Rick Richardson's version distributed via Usenet, not the
|
* Rick Richardson's version distributed via Usenet, not the
|
* version distributed earlier via floppy disk by Reinhold
|
* version distributed earlier via floppy disk by Reinhold
|
* Weicker. As a concession to older compilers, names have
|
* Weicker. As a concession to older compilers, names have
|
* been made unique within the first 8 characters. Inside the
|
* been made unique within the first 8 characters. Inside the
|
* measurement loop, this version follows the version
|
* measurement loop, this version follows the version
|
* previously distributed by Reinhold Weicker.
|
* previously distributed by Reinhold Weicker.
|
*
|
*
|
* At several places in the benchmark, code has been added,
|
* At several places in the benchmark, code has been added,
|
* but within the measurement loop only in branches that
|
* but within the measurement loop only in branches that
|
* are not executed. The intention is that optimizing
|
* are not executed. The intention is that optimizing
|
* compilers should be prevented from moving code out of the
|
* compilers should be prevented from moving code out of the
|
* measurement loop, or from removing code altogether. Since
|
* measurement loop, or from removing code altogether. Since
|
* the statements that are executed within the measurement
|
* the statements that are executed within the measurement
|
* loop have NOT been changed, the numbers defining the
|
* loop have NOT been changed, the numbers defining the
|
* "Dhrystone distribution" (distribution of statements,
|
* "Dhrystone distribution" (distribution of statements,
|
* operand types and locality) still hold. Except for
|
* operand types and locality) still hold. Except for
|
* sophisticated optimizing compilers, execution times for
|
* sophisticated optimizing compilers, execution times for
|
* this version should be the same as for previous versions.
|
* this version should be the same as for previous versions.
|
*
|
*
|
* Since it has proven difficult to subtract the time for the
|
* Since it has proven difficult to subtract the time for the
|
* measurement loop overhead in a correct way, the loop check
|
* measurement loop overhead in a correct way, the loop check
|
* has been made a part of the benchmark. This does have
|
* has been made a part of the benchmark. This does have
|
* an impact - though a very minor one - on the distribution
|
* an impact - though a very minor one - on the distribution
|
* statistics which have been updated for this version.
|
* statistics which have been updated for this version.
|
*
|
*
|
* All changes within the measurement loop are described
|
* All changes within the measurement loop are described
|
* and discussed in the companion paper "Rationale for
|
* and discussed in the companion paper "Rationale for
|
* Dhrystone version 2".
|
* Dhrystone version 2".
|
*
|
*
|
* Because of the self-imposed limitation that the order and
|
* Because of the self-imposed limitation that the order and
|
* distribution of the executed statements should not be
|
* distribution of the executed statements should not be
|
* changed, there are still cases where optimizing compilers
|
* changed, there are still cases where optimizing compilers
|
* may not generate code for some statements. To a certain
|
* may not generate code for some statements. To a certain
|
* degree, this is unavoidable for small synthetic
|
* degree, this is unavoidable for small synthetic
|
* benchmarks. Users of the benchmark are advised to check
|
* benchmarks. Users of the benchmark are advised to check
|
* code listings whether code is generated for all statements
|
* code listings whether code is generated for all statements
|
* of Dhrystone.
|
* of Dhrystone.
|
*
|
*
|
* Version 2.1 is identical to version 2.0 distributed via
|
* Version 2.1 is identical to version 2.0 distributed via
|
* the UNIX network Usenet in March 1988 except that it
|
* the UNIX network Usenet in March 1988 except that it
|
* corrects some minor deficiencies that were found by users
|
* corrects some minor deficiencies that were found by users
|
* of version 2.0. The only change within the measurement
|
* of version 2.0. The only change within the measurement
|
* loop is that a non-executed "else" part was added to the
|
* loop is that a non-executed "else" part was added to the
|
* "if" statement in Func_3, and a non-executed "else" part
|
* "if" statement in Func_3, and a non-executed "else" part
|
* removed from Proc_3.
|
* removed from Proc_3.
|
*
|
*
|
*************************************************************************
|
*************************************************************************
|
*
|
*
|
* Defines: The following "Defines" are possible:
|
* Defines: The following "Defines" are possible:
|
* -DROPT (default: Not defined)
|
* -DROPT (default: Not defined)
|
* As an approximation to what an average C
|
* As an approximation to what an average C
|
* programmer might do, the "register" storage class
|
* programmer might do, the "register" storage class
|
* is applied (if enabled by -DROPT)
|
* is applied (if enabled by -DROPT)
|
* - for local variables, if they are used
|
* - for local variables, if they are used
|
* (dynamically) five or more times
|
* (dynamically) five or more times
|
* - for parameters if they are used (dynamically)
|
* - for parameters if they are used (dynamically)
|
* six or more times
|
* six or more times
|
* Note that an optimal "register" strategy is
|
* Note that an optimal "register" strategy is
|
* compiler-dependent, and that "register"
|
* compiler-dependent, and that "register"
|
* declarations do not necessarily lead to faster
|
* declarations do not necessarily lead to faster
|
* execution.
|
* execution.
|
* -DNOSTRUCTASSIGN (default: Not defined)
|
* -DNOSTRUCTASSIGN (default: Not defined)
|
* Define if the C compiler does not support
|
* Define if the C compiler does not support
|
* assignment of structures.
|
* assignment of structures.
|
* -DNOENUMS (default: Not defined)
|
* -DNOENUMS (default: Not defined)
|
* Define if the C compiler does not support
|
* Define if the C compiler does not support
|
* enumeration types.
|
* enumeration types.
|
*
|
*
|
*************************************************************************
|
*************************************************************************
|
*
|
*
|
* Compilation model and measurement (IMPORTANT):
|
* Compilation model and measurement (IMPORTANT):
|
*
|
*
|
* This C version of Dhrystone consists of three files:
|
* This C version of Dhrystone consists of three files:
|
* - dhry.h (this file, containing global definitions and comments)
|
* - dhry.h (this file, containing global definitions and comments)
|
* - dhry_1.c (containing the code corresponding to Ada package Pack_1)
|
* - dhry_1.c (containing the code corresponding to Ada package Pack_1)
|
* - dhry_2.c (containing the code corresponding to Ada package Pack_2)
|
* - dhry_2.c (containing the code corresponding to Ada package Pack_2)
|
*
|
*
|
* The following "ground rules" apply for measurements:
|
* The following "ground rules" apply for measurements:
|
* - Separate compilation
|
* - Separate compilation
|
* - No procedure merging
|
* - No procedure merging
|
* - Otherwise, compiler optimizations are allowed but should be
|
* - Otherwise, compiler optimizations are allowed but should be
|
* indicated
|
* indicated
|
* - Default results are those without register declarations
|
* - Default results are those without register declarations
|
* See the companion paper "Rationale for Dhrystone Version 2" for a more
|
* See the companion paper "Rationale for Dhrystone Version 2" for a more
|
* detailed discussion of these ground rules.
|
* detailed discussion of these ground rules.
|
*
|
*
|
* For 16-Bit processors (e.g. 80186, 80286), times for all compilation
|
* For 16-Bit processors (e.g. 80186, 80286), times for all compilation
|
* models ("small", "medium", "large" etc.) should be given if possible,
|
* models ("small", "medium", "large" etc.) should be given if possible,
|
* together with a definition of these models for the compiler system
|
* together with a definition of these models for the compiler system
|
* used.
|
* used.
|
*
|
*
|
*************************************************************************
|
*************************************************************************
|
*
|
*
|
* Dhrystone (C version) statistics:
|
* Dhrystone (C version) statistics:
|
*
|
*
|
* [Comment from the first distribution, updated for version 2.
|
* [Comment from the first distribution, updated for version 2.
|
* Note that because of language differences, the numbers are slightly
|
* Note that because of language differences, the numbers are slightly
|
* different from the Ada version.]
|
* different from the Ada version.]
|
*
|
*
|
* The following program contains statements of a high level programming
|
* The following program contains statements of a high level programming
|
* language (here: C) in a distribution considered representative:
|
* language (here: C) in a distribution considered representative:
|
*
|
*
|
* assignments 52 (51.0 %)
|
* assignments 52 (51.0 %)
|
* control statements 33 (32.4 %)
|
* control statements 33 (32.4 %)
|
* procedure, function calls 17 (16.7 %)
|
* procedure, function calls 17 (16.7 %)
|
*
|
*
|
* 103 statements are dynamically executed. The program is balanced with
|
* 103 statements are dynamically executed. The program is balanced with
|
* respect to the three aspects:
|
* respect to the three aspects:
|
*
|
*
|
* - statement type
|
* - statement type
|
* - operand type
|
* - operand type
|
* - operand locality
|
* - operand locality
|
* operand global, local, parameter, or constant.
|
* operand global, local, parameter, or constant.
|
*
|
*
|
* The combination of these three aspects is balanced only approximately.
|
* The combination of these three aspects is balanced only approximately.
|
*
|
*
|
* 1. Statement Type:
|
* 1. Statement Type:
|
* ----------------- number
|
* ----------------- number
|
*
|
*
|
* V1 = V2 9
|
* V1 = V2 9
|
* (incl. V1 = F(..)
|
* (incl. V1 = F(..)
|
* V = Constant 12
|
* V = Constant 12
|
* Assignment, 7
|
* Assignment, 7
|
* with array element
|
* with array element
|
* Assignment, 6
|
* Assignment, 6
|
* with record component
|
* with record component
|
* --
|
* --
|
* 34 34
|
* 34 34
|
*
|
*
|
* X = Y +|-|"&&"|"|" Z 5
|
* X = Y +|-|"&&"|"|" Z 5
|
* X = Y +|-|"==" Constant 6
|
* X = Y +|-|"==" Constant 6
|
* X = X +|- 1 3
|
* X = X +|- 1 3
|
* X = Y *|/ Z 2
|
* X = Y *|/ Z 2
|
* X = Expression, 1
|
* X = Expression, 1
|
* two operators
|
* two operators
|
* X = Expression, 1
|
* X = Expression, 1
|
* three operators
|
* three operators
|
* --
|
* --
|
* 18 18
|
* 18 18
|
*
|
*
|
* if .... 14
|
* if .... 14
|
* with "else" 7
|
* with "else" 7
|
* without "else" 7
|
* without "else" 7
|
* executed 3
|
* executed 3
|
* not executed 4
|
* not executed 4
|
* for ... 7 | counted every time
|
* for ... 7 | counted every time
|
* while ... 4 | the loop condition
|
* while ... 4 | the loop condition
|
* do ... while 1 | is evaluated
|
* do ... while 1 | is evaluated
|
* switch ... 1
|
* switch ... 1
|
* break 1
|
* break 1
|
* declaration with 1
|
* declaration with 1
|
* initialization
|
* initialization
|
* --
|
* --
|
* 34 34
|
* 34 34
|
*
|
*
|
* P (...) procedure call 11
|
* P (...) procedure call 11
|
* user procedure 10
|
* user procedure 10
|
* library procedure 1
|
* library procedure 1
|
* X = F (...)
|
* X = F (...)
|
* function call 6
|
* function call 6
|
* user function 5
|
* user function 5
|
* library function 1
|
* library function 1
|
* --
|
* --
|
* 17 17
|
* 17 17
|
* ---
|
* ---
|
* 103
|
* 103
|
*
|
*
|
* The average number of parameters in procedure or function calls
|
* The average number of parameters in procedure or function calls
|
* is 1.82 (not counting the function values as implicit parameters).
|
* is 1.82 (not counting the function values as implicit parameters).
|
*
|
*
|
*
|
*
|
* 2. Operators
|
* 2. Operators
|
* ------------
|
* ------------
|
* number approximate
|
* number approximate
|
* percentage
|
* percentage
|
*
|
*
|
* Arithmetic 32 50.8
|
* Arithmetic 32 50.8
|
*
|
*
|
* + 21 33.3
|
* + 21 33.3
|
* - 7 11.1
|
* - 7 11.1
|
* * 3 4.8
|
* * 3 4.8
|
* / (int div) 1 1.6
|
* / (int div) 1 1.6
|
*
|
*
|
* Comparison 27 42.8
|
* Comparison 27 42.8
|
*
|
*
|
* == 9 14.3
|
* == 9 14.3
|
* /= 4 6.3
|
* /= 4 6.3
|
* > 1 1.6
|
* > 1 1.6
|
* < 3 4.8
|
* < 3 4.8
|
* >= 1 1.6
|
* >= 1 1.6
|
* <= 9 14.3
|
* <= 9 14.3
|
*
|
*
|
* Logic 4 6.3
|
* Logic 4 6.3
|
*
|
*
|
* && (AND-THEN) 1 1.6
|
* && (AND-THEN) 1 1.6
|
* | (OR) 1 1.6
|
* | (OR) 1 1.6
|
* ! (NOT) 2 3.2
|
* ! (NOT) 2 3.2
|
*
|
*
|
* -- -----
|
* -- -----
|
* 63 100.1
|
* 63 100.1
|
*
|
*
|
*
|
*
|
* 3. Operand Type (counted once per operand reference):
|
* 3. Operand Type (counted once per operand reference):
|
* ---------------
|
* ---------------
|
* number approximate
|
* number approximate
|
* percentage
|
* percentage
|
*
|
*
|
* Integer 175 72.3 %
|
* Integer 175 72.3 %
|
* Character 45 18.6 %
|
* Character 45 18.6 %
|
* Pointer 12 5.0 %
|
* Pointer 12 5.0 %
|
* String30 6 2.5 %
|
* String30 6 2.5 %
|
* Array 2 0.8 %
|
* Array 2 0.8 %
|
* Record 2 0.8 %
|
* Record 2 0.8 %
|
* --- -------
|
* --- -------
|
* 242 100.0 %
|
* 242 100.0 %
|
*
|
*
|
* When there is an access path leading to the final operand (e.g. a
|
* When there is an access path leading to the final operand (e.g. a
|
* record component), only the final data type on the access path is
|
* record component), only the final data type on the access path is
|
* counted.
|
* counted.
|
*
|
*
|
*
|
*
|
* 4. Operand Locality:
|
* 4. Operand Locality:
|
* -------------------
|
* -------------------
|
* number approximate
|
* number approximate
|
* percentage
|
* percentage
|
*
|
*
|
* local variable 114 47.1 %
|
* local variable 114 47.1 %
|
* global variable 22 9.1 %
|
* global variable 22 9.1 %
|
* parameter 45 18.6 %
|
* parameter 45 18.6 %
|
* value 23 9.5 %
|
* value 23 9.5 %
|
* reference 22 9.1 %
|
* reference 22 9.1 %
|
* function result 6 2.5 %
|
* function result 6 2.5 %
|
* constant 55 22.7 %
|
* constant 55 22.7 %
|
* --- -------
|
* --- -------
|
* 242 100.0 %
|
* 242 100.0 %
|
*
|
*
|
*
|
*
|
* The program does not compute anything meaningful, but it is
|
* The program does not compute anything meaningful, but it is
|
* syntactically and semantically correct. All variables have a value
|
* syntactically and semantically correct. All variables have a value
|
* assigned to them before they are used as a source operand.
|
* assigned to them before they are used as a source operand.
|
*
|
*
|
* There has been no explicit effort to account for the effects of a
|
* There has been no explicit effort to account for the effects of a
|
* cache, or to balance the use of long or short displacements for code
|
* cache, or to balance the use of long or short displacements for code
|
* or data.
|
* or data.
|
*
|
*
|
*************************************************************************
|
*************************************************************************
|
*/
|
*/
|
#ifndef __MSP430__
|
#ifndef __MSP430__
|
#define __MSP430__
|
#define __MSP430__
|
#endif
|
#endif
|
|
|
/*******************************************************************************
|
/*******************************************************************************
|
* Adapted for embedded microcontrollers by Graham Davies, ECROS Technology. *
|
* Adapted for embedded microcontrollers by Graham Davies, ECROS Technology. *
|
******************************************************************************/
|
******************************************************************************/
|
|
|
/* Compiler and system dependent definitions: */
|
/* Compiler and system dependent definitions: */
|
|
|
#define Mic_secs_Per_Second 1000000.0
|
#define Mic_secs_Per_Second 1000000.0
|
/* Berkeley UNIX C returns process times in seconds/HZ */
|
/* Berkeley UNIX C returns process times in seconds/HZ */
|
|
|
#ifdef NOSTRUCTASSIGN
|
#ifdef NOSTRUCTASSIGN
|
#define structassign(d, s) memcpy(&(d), &(s), sizeof(d))
|
#define structassign(d, s) memcpy(&(d), &(s), sizeof(d))
|
#else
|
#else
|
#define structassign(d, s) d = s
|
#define structassign(d, s) d = s
|
#endif
|
#endif
|
|
|
#ifdef NOENUM
|
#ifdef NOENUM
|
#define Ident_1 0
|
#define Ident_1 0
|
#define Ident_2 1
|
#define Ident_2 1
|
#define Ident_3 2
|
#define Ident_3 2
|
#define Ident_4 3
|
#define Ident_4 3
|
#define Ident_5 4
|
#define Ident_5 4
|
typedef int Enumeration;
|
typedef int Enumeration;
|
#else
|
#else
|
typedef enum {Ident_1, Ident_2, Ident_3, Ident_4, Ident_5}
|
typedef enum {Ident_1, Ident_2, Ident_3, Ident_4, Ident_5}
|
Enumeration;
|
Enumeration;
|
#endif
|
#endif
|
/* for boolean and enumeration types in Ada, Pascal */
|
/* for boolean and enumeration types in Ada, Pascal */
|
|
|
/* General definitions: */
|
/* General definitions: */
|
|
|
#include <stdio.h>
|
#include <stdio.h>
|
/* for strcpy, strcmp */
|
/* for strcpy, strcmp */
|
|
|
#define Null 0
|
#define Null 0
|
/* Value of a Null pointer */
|
/* Value of a Null pointer */
|
#define true 1
|
#define true 1
|
#define false 0
|
#define false 0
|
|
|
typedef int One_Thirty;
|
typedef int One_Thirty;
|
typedef int One_Fifty;
|
typedef int One_Fifty;
|
typedef char Capital_Letter;
|
typedef char Capital_Letter;
|
typedef int Boolean;
|
typedef int Boolean;
|
typedef char Str_30 [31];
|
typedef char Str_30 [31];
|
typedef int Arr_1_Dim [25]; /* <-- changed from 50 */
|
typedef int Arr_1_Dim [25]; /* <-- changed from 50 */
|
typedef int Arr_2_Dim [25] [25]; /* <-- changed from 50 */
|
typedef int Arr_2_Dim [25] [25]; /* <-- changed from 50 */
|
|
|
typedef struct record
|
typedef struct record
|
{
|
{
|
struct record *Ptr_Comp;
|
struct record *Ptr_Comp;
|
Enumeration Discr;
|
Enumeration Discr;
|
union {
|
union {
|
struct {
|
struct {
|
Enumeration Enum_Comp;
|
Enumeration Enum_Comp;
|
int Int_Comp;
|
int Int_Comp;
|
char Str_Comp [31];
|
char Str_Comp [31];
|
} var_1;
|
} var_1;
|
struct {
|
struct {
|
Enumeration E_Comp_2;
|
Enumeration E_Comp_2;
|
char Str_2_Comp [31];
|
char Str_2_Comp [31];
|
} var_2;
|
} var_2;
|
struct {
|
struct {
|
char Ch_1_Comp;
|
char Ch_1_Comp;
|
char Ch_2_Comp;
|
char Ch_2_Comp;
|
} var_3;
|
} var_3;
|
} variant;
|
} variant;
|
} Rec_Type, *Rec_Pointer;
|
} Rec_Type, *Rec_Pointer;
|
|
|
/* Prototypes of function defined in dhry21b.c and called from dhry21a.c.
|
/* Prototypes of function defined in dhry21b.c and called from dhry21a.c.
|
*/
|
*/
|
void Proc_6( Enumeration Enum_Val_Par, Enumeration * Enum_Ref_Par );
|
void Proc_6( Enumeration Enum_Val_Par, Enumeration * Enum_Ref_Par );
|
void Proc_7( One_Fifty Int_1_Par_Val, One_Fifty Int_2_Par_Val,
|
void Proc_7( One_Fifty Int_1_Par_Val, One_Fifty Int_2_Par_Val,
|
One_Fifty * Int_Par_Ref );
|
One_Fifty * Int_Par_Ref );
|
void Proc_8( Arr_1_Dim Arr_1_Par_Ref, Arr_2_Dim Arr_2_Par_Ref,
|
void Proc_8( Arr_1_Dim Arr_1_Par_Ref, Arr_2_Dim Arr_2_Par_Ref,
|
int Int_1_Par_Val, int Int_2_Par_Val );
|
int Int_1_Par_Val, int Int_2_Par_Val );
|
Enumeration Func_1( Capital_Letter Ch_1_Par_Val, Capital_Letter Ch_2_Par_Val );
|
Enumeration Func_1( Capital_Letter Ch_1_Par_Val, Capital_Letter Ch_2_Par_Val );
|
Boolean Func_2( Str_30 Str_1_Par_Ref, Str_30 Str_2_Par_Ref );
|
Boolean Func_2( Str_30 Str_1_Par_Ref, Str_30 Str_2_Par_Ref );
|
|
|
/*******************************************************************************
|
/*******************************************************************************
|
* Additions for embedded microcontrollers follow ...
|
* Additions for embedded microcontrollers follow ...
|
|
|
#ifdef printf
|
#ifdef printf
|
#undef printf
|
#undef printf
|
#endif
|
#endif
|
#define printf //
|
#define printf //
|
#ifdef fprintf
|
#ifdef fprintf
|
#undef fprintf
|
#undef fprintf
|
#endif
|
#endif
|
#define fprintf //
|
#define fprintf //
|
*/
|
*/
|
|
|
extern void * emalloc( size_t nbytes );
|
extern void * emalloc( size_t nbytes );
|
|
|
#if defined( __AVR_ARCH__ ) /* Atmel AVR */
|
#if defined( __AVR_ARCH__ ) /* Atmel AVR */
|
|
|
#include <avr/io.h>
|
#include <avr/io.h>
|
#define SetPort( state ) PORTB = (state)
|
#define SetPort( state ) PORTB = (state)
|
extern FILE * fopen( const char * filename, const char * mode );
|
extern FILE * fopen( const char * filename, const char * mode );
|
|
|
#elif defined( __ENCORE__ ) /* ZiLOG Z8 Encore! */
|
#elif defined( __ENCORE__ ) /* ZiLOG Z8 Encore! */
|
|
|
#include <ez8.h>
|
#include <ez8.h>
|
#define SetPort( state ) PAOUT = (state)
|
#define SetPort( state ) PAOUT = (state)
|
typedef int FILE;
|
typedef int FILE;
|
extern FILE * fopen( const char * filename, const char * mode );
|
extern FILE * fopen( const char * filename, const char * mode );
|
extern int fclose( FILE * stream );
|
extern int fclose( FILE * stream );
|
|
|
#elif defined( __MSP430__ ) /* MSP430 */
|
#elif defined( __MSP430__ ) /* MSP430 */
|
|
|
|
#ifdef PFX_MSP430
|
typedef int FILE;
|
typedef int FILE;
|
|
#endif
|
|
|
#endif
|
#endif
|
|
|