New uname function

git-svn-id: svn://svn.cc65.org/cc65/trunk@2278 b7a2c559-68d2-44c3-8de9-860c34a00d81

diff --git a/libsrc/common/Makefile b/libsrc/common/Makefile
index bd373b15809ab4ce7e5d0713e454303b1c75df11..f4cee0cc1566a88be0bf44c53c7448d9d67b1d29 100644 (file)
--- a/libsrc/common/Makefile
+++ b/libsrc/common/Makefile
@@ -144,6 +144,7 @@ S_OBJS =    _cwd.o          \
                 time.o          \
                tolower.o       \
                toupper.o       \
+                uname.o         \
                 unlink.o        \
                vfprintf.o      \
                vprintf.o       \

diff --git a/libsrc/common/uname.s b/libsrc/common/uname.s
new file mode 100644 (file)
index 0000000..d6fb484
--- /dev/null
+++ b/libsrc/common/uname.s
@@ -0,0 +1,22 @@
+;
+; Ullrich von Bassewitz, 2003-08-12
+;
+; int __fastcall__ uname (struct utsname* buf);
+;
+
+        .export         _uname
+
+        .import         __sysuname
+        .import         oserrcheck
+
+
+;--------------------------------------------------------------------------
+
+.proc   _uname
+
+        jsr     __sysuname      ; Call the machine specific function
+        jmp     oserrcheck      ; Store into _oserror, set errno, return 0/-1
+
+.endproc
+
+