Changeset e2707e9 in buchla-68k

Timestamp:

11/12/2017 09:06:15 PM (6 years ago)

Author:

Thomas Lopatic <thomas@…>

Branches:

master

Children:

57425b6

Parents:

bbf1e66

Message:

Fixed dec2fr.c.

File:

• ram/dec2fr.c (modified) (4 diffs)

ram/dec2fr.c

@@ -49 +49 @@
 
                                 if (s[3] EQ '-')
-                                        return(0x8000);  /* -100 */
+                                        return(-32768);  /* -100 */
                                 else
-                                        return(0x7FFF);  /* +100 */
+                                        return(32767);  /* +100 */
 
                         } else {
 
-                                return(0xFFFF); /* ERROR */
+                                return(-1);     /* ERROR */
                         }
 
                 } else {
 
-                        return(0xFFFF); /* ERROR */
+                        return(-1);     /* ERROR */
 
                 }
@@ -66 +66 @@
         } else if (s[0] EQ '0') {
 
-                i = (d2f[0][s[1] - '0'] + d2f[1][s[2] - '0']) >> 1;
+                i = (int16_t)((d2f[0][s[1] - '0'] + d2f[1][s[2] - '0']) >> 1);
 
                 if (s[3] EQ '-') {
@@ -81 +81 @@
         }
 
-        return(0xFFFF); /* ERROR */
+        return(-1);     /* ERROR */
 }
 
@@ -110 +110 @@
         }
 
-        if (v & 0x8000) {
+        if (v & (int16_t)0x8000) {
 
                 v = ~v;         /* negative number */