database: DBTypeShortName() return const char *

database/DBtechname.c

@@ -327,11 +327,11 @@ DBTechNoisyNamePlane(planename)
  * ----------------------------------------------------------------------------
  */
 
-char *
-DBTypeShortName(type)
-    TileType type;
+const char *
+DBTypeShortName(
+    TileType type)
 {
-    NameList *tbl;
+    const NameList *tbl;
 
     for (tbl = dbTypeNameLists.sn_next;
 	    tbl != &dbTypeNameLists;

database/database.h.in

@@ -1120,7 +1120,7 @@ extern PlaneMask	DBTypePlaneMaskTbl[TT_MAXTYPES];
 extern char		*DBTypeLongNameTbl[TT_MAXTYPES];
 
     /* Gives a short name for a tile type: */
-extern char		*DBTypeShortName();
+extern const char	*DBTypeShortName(TileType type);
 
     /*
      * The following give masks of all planes that may be affected

drc/DRCprint.c

@@ -32,7 +32,7 @@ static char rcsid[] __attribute__ ((unused)) = "$Header: /usr/cvsroot/magic-8.0/
 #include "drc/drc.h"
 
 extern char *maskToPrint();
-extern char *DBTypeShortName();
+extern const char *DBTypeShortName(TileType type);
 
 /*
  * ----------------------------------------------------------------------------