On Apple GEOS all "low jumptable" entries went into 'diskdrv.inc'. So this needs...

[cc65] / libsrc / common / perror.c

diff --git a/libsrc/common/perror.c b/libsrc/common/perror.c
index 814152e293368a2c30751847948f3b45613520b0..ddc015c1e671854f5abc7664ad0a8605714ee15c 100644 (file)
--- a/libsrc/common/perror.c
+++ b/libsrc/common/perror.c
@@ -1,8 +1,35 @@
-/*
- * perror.c
- *
- * Ullrich von Bassewitz, 01.10.1998
- */
+/*****************************************************************************/
+/*                                                                           */
+/*                                 perror.c                                  */
+/*                                                                           */
+/*                       Print a system error message                        */
+/*                                                                           */
+/*                                                                           */
+/*                                                                           */
+/* (C) 1998-2010, Ullrich von Bassewitz                                      */
+/*                Roemerstrasse 52                                           */
+/*                D-70794 Filderstadt                                        */
+/* EMail:         uz@cc65.org                                                */
+/*                                                                           */
+/*                                                                           */
+/* This software is provided 'as-is', without any expressed or implied       */
+/* warranty.  In no event will the authors be held liable for any damages    */
+/* arising from the use of this software.                                    */
+/*                                                                           */
+/* Permission is granted to anyone to use this software for any purpose,     */
+/* including commercial applications, and to alter it and redistribute it    */
+/* freely, subject to the following restrictions:                            */
+/*                                                                           */
+/* 1. The origin of this software must not be misrepresented; you must not   */
+/*    claim that you wrote the original software. If you use this software   */
+/*    in a product, an acknowledgment in the product documentation would be  */
+/*    appreciated but is not required.                                       */
+/* 2. Altered source versions must be plainly marked as such, and must not   */
+/*    be misrepresented as being the original software.                      */
+/* 3. This notice may not be removed or altered from any source              */
+/*    distribution.                                                          */
+/*                                                                           */
+/*****************************************************************************/
 
 
 
@@ -12,12 +39,17 @@
 
 
 
-void perror (const char* msg)
-{                        
-    if (msg) {               
-        fprintf (stderr, "%s: ", msg);
+void __fastcall__ perror (const char* msg)
+{
+    /* Fetch the message that corresponds to errno */
+    const char* errormsg = strerror (_errno);
+
+    /* Different output depending on msg */
+    if (msg) {
+        fprintf (stderr, "%s: %s\n", msg, errormsg);
+    } else {
+        fprintf (stderr, "%s\n", errormsg);
     }
-    fprintf (stderr, "%s\n", strerror (errno));
 }