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.
5 This file is part of GNU Fortran.
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)
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.
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
28 /* Allow multiple inclusion to work. */
33 /* Simple definitions and enumerations. */
38 typedef struct _ffests_
*ffests
;
39 typedef struct _ffests_ ffestsHolder
;
40 typedef unsigned long int ffestsLength
;
42 /* Include files needed by this one. */
46 /* Structure definitions. */
56 /* Global objects accessed by users of this module. */
59 /* Declare functions with prototypes. */
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
);
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_)
83 /* End of #include file. */
85 #endif /* ! GCC_F_STS_H */