OSDN Git Service

PR fortran/13930
[pf3gnuchains/gcc-fork.git] / gcc / f / sts.h
1 /* sts.h -- Private #include File (module.h template V1.0)
2    Copyright (C) 1995 Free Software Foundation, Inc.
3    Contributed by James Craig Burley.
4
5 This file is part of GNU Fortran.
6
7 GNU Fortran is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
10 any later version.
11
12 GNU Fortran is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with GNU Fortran; see the file COPYING.  If not, write to
19 the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
20 02111-1307, USA.
21
22    Owning Modules:
23       sts.c
24
25    Modifications:
26 */
27
28 /* Allow multiple inclusion to work. */
29
30 #ifndef GCC_F_STS_H
31 #define GCC_F_STS_H
32
33 /* Simple definitions and enumerations. */
34
35
36 /* Typedefs. */
37
38 typedef struct _ffests_ *ffests;
39 typedef struct _ffests_ ffestsHolder;
40 typedef unsigned long int ffestsLength;
41
42 /* Include files needed by this one. */
43
44 #include "malloc.h"
45
46 /* Structure definitions. */
47
48 struct _ffests_
49   {
50     char *text_;
51     mallocPool pool_;
52     ffestsLength len_;
53     ffestsLength max_;
54   };
55
56 /* Global objects accessed by users of this module. */
57
58
59 /* Declare functions with prototypes. */
60
61 void ffests_kill (ffests s);
62 void ffests_new (ffests s, mallocPool pool, ffestsLength size);
63 void ffests_printf (ffests s, const char *ctl, ...) ATTRIBUTE_PRINTF_2;
64 void ffests_putc (ffests s, char c);
65 void ffests_puts (ffests s, const char *string);
66 void ffests_puttext (ffests s, const char *text, ffestsLength length);
67
68 /* Define macros. */
69
70 #define ffests_init_0()
71 #define ffests_init_1()
72 #define ffests_init_2()
73 #define ffests_init_3()
74 #define ffests_init_4()
75 #define ffests_length(s) ((s)->len_)
76 #define ffests_terminate_0()
77 #define ffests_terminate_1()
78 #define ffests_terminate_2()
79 #define ffests_terminate_3()
80 #define ffests_terminate_4()
81 #define ffests_text(s) ((s)->text_)
82
83 /* End of #include file. */
84
85 #endif /* ! GCC_F_STS_H */