1 /* do not edit automatically generated by mc from StdIO. */
2 /* StdIO.def provides general Read and Write procedures.
4 Copyright (C) 2001-2024 Free Software Foundation, Inc.
5 Contributed by Gaius Mulley <gaius.mulley@southwales.ac.uk>.
7 This file is part of GNU Modula-2.
9 GNU Modula-2 is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3, or (at your option)
14 GNU Modula-2 is distributed in the hope that it will be useful, but
15 WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 General Public License for more details.
19 Under Section 7 of GPL version 3, you are granted additional
20 permissions described in the GCC Runtime Library Exception, version
21 3.1, as published by the Free Software Foundation.
23 You should have received a copy of the GNU General Public License and
24 a copy of the GCC Runtime Library Exception along with this program;
25 see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
26 <http://www.gnu.org/licenses/>. */
29 #if !defined (_StdIO_H)
38 # if !defined (PROC_D)
40 typedef void (*PROC_t
) (void);
41 typedef struct { PROC_t proc
; } PROC
;
45 # if defined (_StdIO_C)
48 # define EXTERN extern
51 typedef struct StdIO_ProcWrite_p StdIO_ProcWrite
;
53 typedef struct StdIO_ProcRead_p StdIO_ProcRead
;
55 typedef void (*StdIO_ProcWrite_t
) (char);
56 struct StdIO_ProcWrite_p
{ StdIO_ProcWrite_t proc
; };
58 typedef void (*StdIO_ProcRead_t
) (char *);
59 struct StdIO_ProcRead_p
{ StdIO_ProcRead_t proc
; };
63 Read - is the generic procedure that all higher application layers
64 should use to receive a character.
67 EXTERN
void StdIO_Read (char *ch
);
70 Write - is the generic procedure that all higher application layers
71 should use to emit a character.
74 EXTERN
void StdIO_Write (char ch
);
77 PushOutput - pushes the current Write procedure onto a stack,
78 any future references to Write will actually invoke
82 EXTERN
void StdIO_PushOutput (StdIO_ProcWrite p
);
85 PopOutput - restores Write to use the previous output procedure.
88 EXTERN
void StdIO_PopOutput (void);
91 GetCurrentOutput - returns the current output procedure.
94 EXTERN StdIO_ProcWrite
StdIO_GetCurrentOutput (void);
97 PushInput - pushes the current Read procedure onto a stack,
98 any future references to Read will actually invoke
102 EXTERN
void StdIO_PushInput (StdIO_ProcRead p
);
105 PopInput - restores Write to use the previous output procedure.
108 EXTERN
void StdIO_PopInput (void);
111 GetCurrentInput - returns the current input procedure.
114 EXTERN StdIO_ProcRead
StdIO_GetCurrentInput (void);