source: trunk/libs/newlib/src/libgloss/m68k/io-close.c @ 621

Last change on this file since 621 was 444, checked in by satin@…, 7 years ago

add newlib,libalmos-mkh, restructure shared_syscalls.h and mini-libc

File size: 1.1 KB
Line 
1/*
2 * io-close.c --
3 *
4 * Copyright (c) 2006 CodeSourcery Inc
5 *
6 * The authors hereby grant permission to use, copy, modify, distribute,
7 * and license this software and its documentation for any purpose, provided
8 * that existing copyright notices are retained in all copies and that this
9 * notice is included verbatim in any distributions. No written agreement,
10 * license, or royalty fee is required for any of the authorized uses.
11 * Modifications to this software may be copyrighted by their authors
12 * and need not follow the licensing terms described here, provided that
13 * the new terms are clearly indicated on the first page of each file where
14 * they apply.
15 */
16
17#include <unistd.h>
18#include <errno.h>
19#define IO close
20#include "io.h"
21
22/*
23 * close -- close a file descriptor.
24 * input parameters:
25 *   0 : file descriptor
26 * output parameters:
27 *   0 : result
28 *   1 : errno
29 */
30
31int close (int fd)
32{
33#if HOSTED
34  gdb_parambuf_t parameters;
35  parameters[0] = (uint32_t) fd;
36  __hosted (HOSTED_CLOSE, parameters);
37  errno = __hosted_from_gdb_errno (parameters[1]);
38  return parameters[0];
39#else
40  return 0;
41#endif
42}
Note: See TracBrowser for help on using the repository browser.