]> git.sur5r.net Git - cc65/blob - libsrc/creativision/sysuname.s
Cleanups for Creativision.
[cc65] / libsrc / creativision / sysuname.s
1 ;
2 ; Ullrich von Bassewitz, 2003-08-12
3 ;
4 ; unsigned char __fastcall__ _sysuname (struct utsname* buf);
5 ;
6
7         .export         __sysuname, utsdata
8
9         .import         utscopy
10
11         __sysuname = utscopy
12
13 ;--------------------------------------------------------------------------
14 ; Data. We define a fixed utsname struct here and just copy it.
15
16 .rodata
17
18 utsdata:
19         ; sysname
20         .asciiz         "cc65"
21
22         ; nodename
23         .asciiz         ""
24
25         ; release
26         .byte           ((.VERSION >> 8) & $0F) + '0'
27         .byte           '.'
28         .byte           ((.VERSION >> 4) & $0F) + '0'
29         .byte           $00
30
31         ; version
32         .byte           (.VERSION & $0F) + '0'
33         .byte           $00
34
35         ; machine
36         .asciiz         "CREATIVISION"