URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [newlib-1.18.0/] [newlib/] [libc/] [sys/] [h8300hms/] [close.S] - Blame information for rev 207

Go to most recent revision | Details | Compare with Previous | View Log


;int close(int fd);
;Integer arguments have to be zero extended.
 
#include "setarch.h"
 
        .section .text
        .align 2
        .global __close
__close:
#if defined(__H8300H__) || defined(__H8300S__) || defined (__H8300SX__)
#if __INT_MAX__ == 32767
        extu.l er0
#endif
#endif
        jsr @@0xc9
        rts
        .end

Line No.	Rev	Author	Line
1	207	jeremybenn	`;int close(int fd);`
2			`;Integer arguments have to be zero extended.`
3
4			`#include "setarch.h"`
5
6			`.section .text`
7			`.align 2`
8			`.global __close`
9			`__close:`
10			`#if defined(__H8300H__) \|\| defined(__H8300S__) \|\| defined (__H8300SX__)`
11			`#if __INT_MAX__ == 32767`
12			`extu.l er0`
13			`#endif`
14			`#endif`
15			`jsr @@0xc9`
16			`rts`
17			`.end`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [newlib-1.18.0/] [newlib/] [libc/] [sys/] [h8300hms/] [close.S] - Blame information for rev 207