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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 485 - (hide annotations) (download) (as text)
Tue Apr 18 04:47:11 2006 UTC (16 years, 2 months 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 aw0a 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 jds 54 */
29    
30     /** @file
31     * THE UTILITIES IN THIS HEADER ARE DEPRECATED.
32     * <pre>
33 aw0a 1 * 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 jds 54 *
39 aw0a 1 * 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 jds 54 * 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 aw0a 1 */
63 jds 54
64 aw0a 1 #ifndef _OLD_UTILS_H
65     #define _OLD_UTILS_H
66    
67 jds 54 /**
68 aw0a 1 * 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 johnpye 89 extern char *asc_make_dimensions(CONST dim_type *dim);
74 jds 54 /**<
75     * <!-- dimens = asc_make_dimensions(dim) -->
76     * <!-- char *dimens; -->
77     * <!-- dim_type *dim; -->
78 aw0a 1 *
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 jds 54 *
83     * @deprecated No longer supported.
84 aw0a 1 */
85    
86     extern int g_check_dimensions_noisy;
87 johnpye 485 /**<
88 jds 54 * If 0, warnings are suppressed. If 1, warnings are given
89     * from asc_check_dimensions().
90     *
91     * @deprecated No longer supported.
92 aw0a 1 */
93    
94 jds 114 extern int asc_check_dimensions(CONST struct relation *rel, dim_type *dimens);
95 jds 54 /**<
96     * <!-- valid = asc_check_dimensions(rel,dimens); -->
97     * <!-- int valid; -->
98     * <!-- struct relation *rel; -->
99     * <!-- dim_type *dimens; -->
100 aw0a 1 *
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 jds 54 * 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 aw0a 1 */
116 jds 54
117     #endif /* _OLD_UTILS_H */
118    

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