Changeset 7258c6a in buchla-68k for ram/cminit.c

Timestamp:

07/09/2017 04:45:34 PM (7 years ago)

Author:

Thomas Lopatic <thomas@…>

Branches:

master

Children:

8618599

Parents:

0292fbb

Message:

Use standard integer types.

File:

• ram/cminit.c (modified) (11 diffs)

ram/cminit.c

@@ -16 +16 @@
 #define CM_DBLK         if (!QQanch) while (*QQip EQ ' ') ++QQip
 
-int     QQsw;           /* parser result switch */
-int     QQanch;         /* parser anchored match switch */
-
-char    *QQin;          /* parser initial input pointer */
-char    *QQip;          /* parser current input pointer */
-char    *QQop;          /* parser string output pointer */
-
-long    QQnum;          /* parser numeric result */
-int     QQlnum;         /* parser list element number result */
-char    QQdig;          /* parser digit result */
-char    QQchr;          /* parser character result */
-
-char    QQstr[CM_MXSTR];        /* parser string result */
+int16_t QQsw;           /* parser result switch */
+int16_t QQanch;         /* parser anchored match switch */
+
+int8_t  *QQin;          /* parser initial input pointer */
+int8_t  *QQip;          /* parser current input pointer */
+int8_t  *QQop;          /* parser string output pointer */
+
+int32_t QQnum;          /* parser numeric result */
+int16_t QQlnum;         /* parser list element number result */
+int8_t  QQdig;          /* parser digit result */
+int8_t  QQchr;          /* parser character result */
+
+int8_t  QQstr[CM_MXSTR];        /* parser string result */
 
 /* 
@@ -40 +40 @@
 */
 
-void CMinit(char *ip)
-{
-        register int i;
-        register char *t;
+void CMinit(int8_t *ip)
+{
+        register int16_t i;
+        register int8_t *t;
 
         QQip = ip;
@@ -69 +69 @@
 */
 
-int CMchr(char c)
+int16_t CMchr(int8_t c)
 {
         CM_DBLK;
@@ -90 +90 @@
 */
 
-int CMuchr(char c)
-{
-        register char t;
+int16_t CMuchr(int8_t c)
+{
+        register int8_t t;
 
         CM_DBLK;
@@ -123 +123 @@
 */
 
-int CMstr(char *s)
-{
-        register char *t;
-        char *q;
+int16_t CMstr(int8_t *s)
+{
+        register int8_t *t;
+        int8_t *q;
 
         CM_DBLK;
@@ -157 +157 @@
 */
 
-int CMustr(char *s)
-{
-        register char *t, t1, t2;
-        char *q;
+int16_t CMustr(int8_t *s)
+{
+        register int8_t *t, t1, t2;
+        int8_t *q;
 
         CM_DBLK;
@@ -202 +202 @@
 */
 
-int CMlong(void)
-{
-        register char *p;
-        register long n;
-        register char c;
+int16_t CMlong(void)
+{
+        register int8_t *p;
+        register int32_t n;
+        register int8_t c;
 
         CM_DBLK;
@@ -249 +249 @@
 */
 
-int CMdig(void)
-{
-        register char c;
+int16_t CMdig(void)
+{
+        register int8_t c;
 
         CM_DBLK;
@@ -278 +278 @@
 */
 
-int CMlist(char *l[])
-{
-        register int    n;
-        register char   *p, *q;
+int16_t CMlist(int8_t *l[])
+{
+        register int16_t        n;
+        register int8_t *p, *q;
 
         CM_DBLK;
@@ -318 +318 @@
 */
 
-int CMulist(char *l[])
-{
-        register int    n;
-        register char   *p, *q;
+int16_t CMulist(int8_t *l[])
+{
+        register int16_t        n;
+        register int8_t *p, *q;
 
         CM_DBLK;
@@ -357 +357 @@
 */
 
-int CMstat(char *msg)
-{
-        register char *tp;
+int16_t CMstat(int8_t *msg)
+{
+        register int8_t *tp;
 
         tp = QQin;