]>
Commit | Line | Data |
---|---|---|
83ffe9cd | 1 | (* Copyright (C) 2001-2023 Free Software Foundation, Inc. *) |
1eee94d3 GM |
2 | (* This file is part of GNU Modula-2. |
3 | ||
4 | GNU Modula-2 is free software; you can redistribute it and/or modify it under | |
5 | the terms of the GNU General Public License as published by the Free | |
6 | Software Foundation; either version 2, or (at your option) any later | |
7 | version. | |
8 | ||
9 | GNU Modula-2 is distributed in the hope that it will be useful, but WITHOUT ANY | |
10 | WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
11 | FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
12 | for more details. | |
13 | ||
14 | You should have received a copy of the GNU General Public License along | |
15 | with gm2; see the file COPYING. If not, write to the Free Software | |
16 | Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. *) | |
81d5ca0b | 17 | |
1eee94d3 GM |
18 | DEFINITION MODULE libc ; |
19 | ||
20 | FROM SYSTEM IMPORT ADDRESS ; | |
21 | EXPORT UNQUALIFIED write, exit ; | |
22 | ||
23 | PROCEDURE write (fd: INTEGER; a: ADDRESS; bytes: CARDINAL) : INTEGER ; | |
24 | PROCEDURE exit (e: INTEGER) ; | |
25 | ||
26 | END libc. |