/[ascend]/trunk/tcltk98/generic/interface/old_utils.h
ViewVC logotype

Contents of /trunk/tcltk98/generic/interface/old_utils.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 485 - (show annotations) (download) (as text)
Tue Apr 18 04:47:11 2006 UTC (16 years, 1 month ago) by johnpye
File MIME type: text/x-chdr
File size: 4607 byte(s)
Huge cleanup of file header comments (GPL notice etc).

Changed from ASC_DLLSPEC to ASC_DLLSPEC(TYPE) -- like python

Fixed up some badly export symbols (missing 'extern')

Fixed exporting of symbols from error.h

Removed ASC_DLLSPEC from .c files-- only in .h files now (hope that's right...)

Changed the way bintoken does its exporting, to take 
advantage of ASC_BUILDING_LIBASCEND (needs testing)

I wonder if the 'extern' keywork should be a part of the ASC_DLLSPEC macro?

1 /*
2 * Utility functions for Ascend
3 * Version: $Revision: 1.2 $
4 * Version control file: $RCSfile: old_utils.h,v $
5 * Date last modified: $Date: 1998/01/29 01:04:09 $
6 * Last modified by: $Author: ballan $
7 *
8 * This file is part of the Ascend Programming System.
9 *
10 * Copyright (C) 1990 Karl Michael Westerberg
11 * Copyright (C) 1993 Joseph James Zaher
12 * Copyright (C) 1993, 1994 Benjamin Andrew Allan, Joseph James Zaher
13 *
14 * The Ascend Programming System is free software; you can redistribute
15 * it and/or modify it under the terms of the GNU General Public License as
16 * published by the Free Software Foundation; either version 2 of the
17 * License, or (at your option) any later version.
18 *
19 * Ascend is distributed in hope that it will be
20 * useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
22 * General Public License for more details.
23 *
24 * You should have received a copy of the GNU General Public License
25 * along with the program; if not, write to the Free Software Foundation,
26 * Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check the file named
27 * COPYING.
28 */
29
30 /** @file
31 * THE UTILITIES IN THIS HEADER ARE DEPRECATED.
32 * <pre>
33 * This module defines the dimensionality checking and some other
34 * auxillaries for Ascend.
35 *
36 * This file is called old_utils because these utilities are outdated and
37 * need to go away. DO NOT MAKE ANY MORE REFERENCES TO THESE FUNCTIONS!
38 *
39 * Contents: ASCEND Utilities module
40 *
41 * Authors: Karl Westerberg
42 * Joseph Zaher
43 *
44 * Dates: 06/90 - original version
45 * 03/94 - Re-wrote name making functions which no longer
46 * need pre-allocated string space as an argument
47 * to write to. Added an additional function which
48 * creates instance names utilizing the shortest
49 * path. The dimension string output function also
50 * no longer requires pre-allocation of a string.
51 * 04/94 - Provided a relation dimension checker.
52 *
53 * Description: This module provides supplementary functions which may
54 * prove useful by any client of the ASCEND system.
55 *
56 * Requires: #include "utilities/ascConfig.h"
57 * #include "compiler/instance_enum.h"
58 * #include "compiler/fractions.h"
59 * #include "compiler/dimen.h"
60 * #include "compiler/relation_type.h"
61 * </pre>
62 */
63
64 #ifndef _OLD_UTILS_H
65 #define _OLD_UTILS_H
66
67 /**
68 * functions that are soon to go away are surrounded with
69 * #if (NOLONGERSUPPORTED == 0). These functions should not be used.
70 */
71 #define NOLONGERSUPPORTED 1
72
73 extern char *asc_make_dimensions(CONST dim_type *dim);
74 /**<
75 * <!-- dimens = asc_make_dimensions(dim) -->
76 * <!-- char *dimens; -->
77 * <!-- dim_type *dim; -->
78 *
79 * Prints the dimensions to a sufficiently long string which
80 * is created and returned. The string should be destroyed when
81 * no longer in use.
82 *
83 * @deprecated No longer supported.
84 */
85
86 extern int g_check_dimensions_noisy;
87 /**<
88 * If 0, warnings are suppressed. If 1, warnings are given
89 * from asc_check_dimensions().
90 *
91 * @deprecated No longer supported.
92 */
93
94 extern int asc_check_dimensions(CONST struct relation *rel, dim_type *dimens);
95 /**<
96 * <!-- valid = asc_check_dimensions(rel,dimens); -->
97 * <!-- int valid; -->
98 * <!-- struct relation *rel; -->
99 * <!-- dim_type *dimens; -->
100 *
101 * Scans a relation in postfix and collects all dimensional
102 * information by applying each token. It returns a value of TRUE
103 * only if no real instances or real atom instances with wild
104 * dimensionality and no dimensional inconsistencies were encountered.
105 * If the return value is 2 rather than 1, then the dimensionality
106 * has been determined before.
107 * The address of an allocated dimension type is passed in so that
108 * the dimensions of the relation (or at least what the function
109 * thinks the dimensions ought to be) can be also obtained.<br><br>
110 *
111 *
112 * THIS ONLY WORKS ON e_token relations and later for e_opcode
113 * relations. rel is assumed to be valid when called. !!!
114 * @deprecated No longer supported.
115 */
116
117 #endif /* _OLD_UTILS_H */
118

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22