26 |
* along with the program; if not, write to the Free Software Foundation, |
* along with the program; if not, write to the Free Software Foundation, |
27 |
* Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check the file named |
* Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check the file named |
28 |
* COPYING. |
* COPYING. |
29 |
* |
*/ |
30 |
|
|
31 |
|
/** @file |
32 |
|
* THE UTILITIES IN THIS HEADER ARE DEPRECATED. |
33 |
|
* <pre> |
34 |
* This module defines the dimensionality checking and some other |
* This module defines the dimensionality checking and some other |
35 |
* auxillaries for Ascend. |
* auxillaries for Ascend. |
36 |
* |
* |
|
* |
|
37 |
* This file is called old_utils because these utilities are outdated and |
* This file is called old_utils because these utilities are outdated and |
|
* ^^^ |
|
38 |
* need to go away. DO NOT MAKE ANY MORE REFERENCES TO THESE FUNCTIONS! |
* need to go away. DO NOT MAKE ANY MORE REFERENCES TO THESE FUNCTIONS! |
39 |
*/ |
* |
|
|
|
|
/* |
|
40 |
* Contents: ASCEND Utilities module |
* Contents: ASCEND Utilities module |
41 |
* |
* |
42 |
* Authors: Karl Westerberg |
* Authors: Karl Westerberg |
54 |
* Description: This module provides supplementary functions which may |
* Description: This module provides supplementary functions which may |
55 |
* prove useful by any client of the ASCEND system. |
* prove useful by any client of the ASCEND system. |
56 |
* |
* |
57 |
|
* Requires: #include "utilities/ascConfig.h" |
58 |
|
* #include "compiler/instance_enum.h" |
59 |
|
* #include "compiler/fractions.h" |
60 |
|
* #include "compiler/dimen.h" |
61 |
|
* #include "compiler/relation_type.h" |
62 |
|
* </pre> |
63 |
*/ |
*/ |
64 |
|
|
65 |
#ifndef _OLD_UTILS_H |
#ifndef _OLD_UTILS_H |
66 |
#define _OLD_UTILS_H |
#define _OLD_UTILS_H |
67 |
|
|
68 |
/* requires |
/** |
|
* #include "instance_enum.h" |
|
|
* #include "fractions.h" |
|
|
* #include "dimen.h" |
|
|
*/ |
|
|
|
|
|
/* |
|
69 |
* functions that are soon to go away are surrounded with |
* functions that are soon to go away are surrounded with |
70 |
* #if (NOLONGERSUPPORTED == 0). These functions should not be used. |
* #if (NOLONGERSUPPORTED == 0). These functions should not be used. |
71 |
*/ |
*/ |
72 |
#define NOLONGERSUPPORTED 1 |
#define NOLONGERSUPPORTED 1 |
73 |
|
|
74 |
extern char *asc_make_dimensions(); |
extern char *asc_make_dimensions(dim_type *dim); |
75 |
/* |
/**< |
76 |
* dimens = asc_make_dimensions(dim) |
* <!-- dimens = asc_make_dimensions(dim) --> |
77 |
* char *dimens; |
* <!-- char *dimens; --> |
78 |
* dim_type *dim; |
* <!-- dim_type *dim; --> |
79 |
* |
* |
80 |
* Prints the dimensions to a sufficiently long string which |
* Prints the dimensions to a sufficiently long string which |
81 |
* is created and returned. The string should be destroyed when |
* is created and returned. The string should be destroyed when |
82 |
* no longer in use. |
* no longer in use. |
83 |
|
* |
84 |
|
* @deprecated No longer supported. |
85 |
*/ |
*/ |
86 |
|
|
87 |
extern int g_check_dimensions_noisy; |
extern int g_check_dimensions_noisy; |
88 |
/* |
/**< |
89 |
* if 0, warnings are suppressed. if 1, warnings are given |
* If 0, warnings are suppressed. If 1, warnings are given |
90 |
* from asc_check_dimensions(); |
* from asc_check_dimensions(). |
91 |
|
* |
92 |
|
* @deprecated No longer supported. |
93 |
*/ |
*/ |
94 |
|
|
95 |
extern int asc_check_dimensions(); |
extern int asc_check_dimensions(struct relation *rel, dim_type *dimens); |
96 |
/* |
/**< |
97 |
* valid = asc_check_dimensions(rel,dimens); |
* <!-- valid = asc_check_dimensions(rel,dimens); --> |
98 |
* int valid; |
* <!-- int valid; --> |
99 |
* struct relation *rel; |
* <!-- struct relation *rel; --> |
100 |
* dim_type *dimens; |
* <!-- dim_type *dimens; --> |
|
* |
|
|
* THIS ONLY WORKS ON e_token relations and later for e_opcode |
|
|
* relations. rel is assumed to be valid when called. !!! |
|
101 |
* |
* |
102 |
* Scans a relation in postfix and collects all dimensional |
* Scans a relation in postfix and collects all dimensional |
103 |
* information by applying each token. It returns a value of TRUE |
* information by applying each token. It returns a value of TRUE |
107 |
* has been determined before. |
* has been determined before. |
108 |
* The address of an allocated dimension type is passed in so that |
* The address of an allocated dimension type is passed in so that |
109 |
* the dimensions of the relation (or at least what the function |
* the dimensions of the relation (or at least what the function |
110 |
* thinks the dimensions ought to be) can be also obtained. |
* thinks the dimensions ought to be) can be also obtained.<br><br> |
111 |
|
* |
112 |
|
* |
113 |
|
* THIS ONLY WORKS ON e_token relations and later for e_opcode |
114 |
|
* relations. rel is assumed to be valid when called. !!! |
115 |
|
* @deprecated No longer supported. |
116 |
*/ |
*/ |
117 |
#endif /* _OLD_UTILS_H */ |
|
118 |
|
#endif /* _OLD_UTILS_H */ |
119 |
|
|