[Oorexx-svn] SF.net SVN: oorexx: [1950] sandbox/rick/wp64/kernel

[<bi...@us...>]

Revision: 1950
          http://oorexx.svn.sourceforge.net/oorexx/?rev=1950&view=rev
Author:   bigrixx
Date:     2007-12-31 13:32:11 -0800 (Mon, 31 Dec 2007)

Log Message:
-----------
Clean compile on Linux

Modified Paths:
--------------
    sandbox/rick/wp64/kernel/parser/InstructionParser.cpp
    sandbox/rick/wp64/kernel/parser/SourceFile.cpp
    sandbox/rick/wp64/kernel/runtime/RexxNativeActivation.cpp
    sandbox/rick/wp64/kernel/runtime/RexxVariableDictionary.cpp

Modified: sandbox/rick/wp64/kernel/parser/InstructionParser.cpp
===================================================================
--- sandbox/rick/wp64/kernel/parser/InstructionParser.cpp	2007-12-31 20:50:24 UTC (rev 1949)
+++ sandbox/rick/wp64/kernel/parser/InstructionParser.cpp	2007-12-31 21:32:11 UTC (rev 1950)
@@ -1691,7 +1691,7 @@
   bool                   raiseReturn;  /* return form                       */
 
 
-  arrayCount = -1;                     /* clear out the temporaries         */
+  arrayCount = SIZE_MAX;               /* clear out the temporaries         */
   _expression = OREF_NULL;
   description = OREF_NULL;
   additional = OREF_NULL;
@@ -1773,7 +1773,7 @@
 
       case SUBKEY_ADDITIONAL:          /* RAISE ... ADDITIONAL expr         */
                                        /* have a additional already?        */
-        if (additional != OREF_NULL || arrayCount != -1)
+        if (additional != OREF_NULL || arrayCount != SIZE_MAX)
                                        /* this is invalid                   */
           syntaxError(Error_Invalid_subkeyword_additional);
                                        /* get the keyword value             */
@@ -1787,7 +1787,7 @@
 
       case SUBKEY_ARRAY:               /* RAISE ... ARRAY expr              */
                                        /* have a additional already?        */
-        if (additional != OREF_NULL || arrayCount != -1)
+        if (additional != OREF_NULL || arrayCount != SIZE_MAX)
                                        /* this is invalid                   */
           syntaxError(Error_Invalid_subkeyword_additional);
         token = nextReal();            /* get the next token                */
@@ -1829,7 +1829,7 @@
     }
     token = nextReal();                /* step to the next keyword          */
   }
-  if (arrayCount != -1)                /* have the array version?           */
+  if (arrayCount != SIZE_MAX)          /* have the array version?           */
                                        /* create a new translator object    */
     newObject = new_variable_instruction(RAISE, Raise, sizeof(RexxInstructionRaise) + (arrayCount - 1) * sizeof(RexxObject *));
   else                                 /* static instruction size           */

Modified: sandbox/rick/wp64/kernel/parser/SourceFile.cpp
===================================================================
--- sandbox/rick/wp64/kernel/parser/SourceFile.cpp	2007-12-31 20:50:24 UTC (rev 1949)
+++ sandbox/rick/wp64/kernel/parser/SourceFile.cpp	2007-12-31 21:32:11 UTC (rev 1950)
@@ -4774,7 +4774,7 @@
 
         case '?':                      /* debug toggle character            */
                                        /* already toggling?                 */
-          if (*debug == DEBUG_TOGGLE)
+          if (*debug == (size_t)DEBUG_TOGGLE)
             *debug = DEBUG_IGNORE;     /* this is back to no change at all  */
           else
             *debug = DEBUG_TOGGLE;     /* need to toggle the debug mode     */

Modified: sandbox/rick/wp64/kernel/runtime/RexxNativeActivation.cpp
===================================================================
--- sandbox/rick/wp64/kernel/runtime/RexxNativeActivation.cpp	2007-12-31 20:50:24 UTC (rev 1949)
+++ sandbox/rick/wp64/kernel/runtime/RexxNativeActivation.cpp	2007-12-31 21:32:11 UTC (rev 1950)
@@ -859,7 +859,7 @@
 /* Function: Reset the next state of the variable pool                        */
 /******************************************************************************/
 {
-  this->nextvariable = -1;             /* turn off next index               */
+  this->nextvariable = SIZE_MAX;       /* turn off next index               */
   this->nextcurrent = OREF_NULL;       /* clear the next value              */
   this->nextstem = OREF_NULL;          /* clear the secondary pointer       */
   this->compoundelement = OREF_NULL;
@@ -881,7 +881,7 @@
   if (nextCurrent() == OREF_NULL) {
     /* grab the activation context */
     RexxActivation *act = activity->getCurrentActivation();
-    setNextVariable(-1);               /* request the first item            */
+    setNextVariable(SIZE_MAX);         /* request the first item            */
     /* Get the local variable dictionary from the context. */
     setNextCurrent(act->getLocalVariables());
                                        /* we are not on a stem              */

Modified: sandbox/rick/wp64/kernel/runtime/RexxVariableDictionary.cpp
===================================================================
--- sandbox/rick/wp64/kernel/runtime/RexxVariableDictionary.cpp	2007-12-31 20:50:24 UTC (rev 1949)
+++ sandbox/rick/wp64/kernel/runtime/RexxVariableDictionary.cpp	2007-12-31 21:32:11 UTC (rev 1950)
@@ -247,7 +247,7 @@
   RexxVariable *variable;              /* variable entry                    */
   RexxObject *value;                   /* variable value                    */
 
-  if (activation->nextVariable() == -1)/* first time through?               */
+  if (activation->nextVariable() == SIZE_MAX)/* first time through?               */
                                        /* get the first item                */
     activation->setNextVariable(this->contents->first());
   else                                 /* step to the next index item       */


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.