From 88cf37765981bcebc2fcf14a5c9e9cb7d7612752 Mon Sep 17 00:00:00 2001
From: "zik.saleeba" <zik.saleeba@21eae674-98b7-11dd-bd71-f92a316d2d60>
Date: Tue, 15 Feb 2011 21:06:47 +0000
Subject: [PATCH] Changes for a clean compile on the SRV

git-svn-id: http://picoc.googlecode.com/svn/trunk@537 21eae674-98b7-11dd-bd71-f92a316d2d60
---
 parse.c                     |  2 +-
 picoc.c                     | 23 ++++++++++++-----------
 platform/library_surveyor.c |  2 +-
 3 files changed, 14 insertions(+), 13 deletions(-)

diff --git a/parse.c b/parse.c
index 084d376..c551b0c 100644
--- a/parse.c
+++ b/parse.c
@@ -68,7 +68,7 @@ struct Value *ParseFunctionDefinition(struct ParseState *Parser, struct ValueTyp
 {
     struct ValueType *ParamType;
     char *ParamIdentifier;
-    enum LexToken Token;
+    enum LexToken Token = TokenNone;
     struct ParseState ParamParser;
     struct Value *FuncValue;
     struct Value *OldFuncValue;
diff --git a/picoc.c b/picoc.c
index a7c2308..b95e55b 100644
--- a/picoc.c
+++ b/picoc.c
@@ -128,23 +128,23 @@ int main(int argc, char **argv)
 #else
 # ifdef SURVEYOR_HOST
 int picoc(char *SourceStr)
-{    
-    unsigned int i;
-    unsigned int sl;
-	
+
+{   
+    char *pos;
+
     Initialise(HEAP_SIZE);
 
-    sl = strlen(SourceStr);
-    if (SourceStr) 
+    if (SourceStr)
     {
-        for (i = 0; i < sl; i++)
+        for (pos = SourceStr; *pos != 0; pos++)
         {
-            if (SourceStr[i] == 0x1A)
+            if (*pos == 0x1a)
             {
-                SourceStr[i] = 0x20;
+                *pos = 0x20;
             }
         }
     }
+
     ExitBuf[40] = 0;
     PlatformSetExitPoint();
     if (ExitBuf[40]) {
@@ -152,9 +152,10 @@ int picoc(char *SourceStr)
         Cleanup();
         return ExitValue;
     }
-        
-    if (SourceStr)    
+
+    if (SourceStr)   
         Parse("nofile", SourceStr, strlen(SourceStr), TRUE, TRUE, FALSE);
+
     ParseInteractive();
     Cleanup();
     return ExitValue;
diff --git a/platform/library_surveyor.c b/platform/library_surveyor.c
index 31c8672..c9cd8eb 100644
--- a/platform/library_surveyor.c
+++ b/platform/library_surveyor.c
@@ -36,7 +36,7 @@ void PlatformLibraryInit()
     VariableDefinePlatformVar(NULL, "cxmax", &IntType, (union AnyValue *)&Cxmax, FALSE);
     VariableDefinePlatformVar(NULL, "cymin", &IntType, (union AnyValue *)&Cymin, FALSE);
     VariableDefinePlatformVar(NULL, "cymax", &IntType, (union AnyValue *)&Cymax, FALSE);
-    LibraryInit(&GlobalTable, "platform library", &PlatformLibrary);
+    LibraryInit(&GlobalTable, "platform library", &PlatformLibrary[0]);
 }
 
 void Csignal(struct ParseState *Parser, struct Value *ReturnValue, struct Value **Param, int NumArgs)  // check for kbhit, return t or nil