From 271e1811e306481b3b87bcd13bfae5cb60885849 Mon Sep 17 00:00:00 2001
From: Ralph Lange <Ralph.Lange@gmx.de>
Date: Thu, 22 May 2014 16:18:02 +0200
Subject: [PATCH] ioc/dbStatic: make offset in field description an unsigned
 short, add cast to code generator

fixes ~2600 compiler warnings (on windows-x64)
---
 src/ioc/dbStatic/dbBase.h     | 2 +-
 src/tools/dbdToRecordtypeH.pl | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/ioc/dbStatic/dbBase.h b/src/ioc/dbStatic/dbBase.h
index 6ef2d2b3c..691953442 100644
--- a/src/ioc/dbStatic/dbBase.h
+++ b/src/ioc/dbStatic/dbBase.h
@@ -88,7 +88,7 @@ typedef struct dbFldDes{  /* field description */
     /*On no runtime following only set for STRING			*/
     short	size;		/*length in bytes of a field element	*/
     /*The following are only available on run time system*/
-    short	offset;		/*Offset in bytes from beginning of record*/
+    unsigned short	offset;		/*Offset in bytes from beginning of record*/
 }dbFldDes;
 
 typedef struct dbInfoNode {	/*non-field per-record information*/
diff --git a/src/tools/dbdToRecordtypeH.pl b/src/tools/dbdToRecordtypeH.pl
index ea55d27b4..d4140cc87 100755
--- a/src/tools/dbdToRecordtypeH.pl
+++ b/src/tools/dbdToRecordtypeH.pl
@@ -124,8 +124,8 @@ sub oldtables {
                 "sizeof(prec->" . $_->C_name . ");"
             } $rtyp->fields) . "\n" .
         join("\n", map {
-                "    prt->papFldDes[${rn}Record" . $_->name . "]->offset = " .
-                "(char *)&prec->" . $_->C_name . " - (char *)prec;"
+                "    prt->papFldDes[${rn}Record" . $_->name . "]->offset = (unsigned short)(" .
+                "(char *)&prec->" . $_->C_name . " - (char *)prec);"
             } $rtyp->fields) . "\n" .
         "    prt->rec_size = sizeof(*prec);\n" .
         "    return 0;\n" .