fixed build for clang

dvm/fdvm/trunk/Sage/lib/newsrc/annotate.y

@@ -15,7 +15,13 @@
 #ifdef _NEEDALLOCAH_
 #  include <alloca.h>
 #endif
- 
+
+extern char* xmalloc(int size);
+extern void Message(char *s, int l);
+extern void set_up_momentum(int value,int token);
+extern void automata_driver(int value); 
+extern char* copys(char *);
+
 #define ON 1
 #define OFF 0
 #define OTHER 2
@@ -182,8 +188,8 @@ extern POINTER newNode();
    char AnnExTensionNumber[255]; /* to symbole right for the annotation  */
    static int Recog_My_Token();
    static int look_up_specialfunction();
-   static unMYGETC();
-   static MYGETC();
+   static char unMYGETC(char c);
+   static char MYGETC();
    static int map_assgn_op();
 %}  
 
@@ -1114,7 +1120,7 @@ char *p;
   register char *p2, *p1;
   extern char *malloc();
 
-  newbuf = malloc((unsigned)(newlength+1));
+  newbuf = malloc(newlength+1));
 
   p2 = newbuf;
   p1 = newbuf + newlength + 1;
@@ -1844,8 +1850,7 @@ look_up(st)
   return (PTR_HASH)  pt;
 }
 
-static
-MYGETC()
+static char MYGETC()
 {
   
   if (LENSTRINGTOPARSE <= PTTOSTRINGTOPARSE)
@@ -1861,9 +1866,7 @@ MYGETC()
   return STRINGTOPARSE[ PTTOSTRINGTOPARSE-1];
 }
 
-static
-unMYGETC(c)
-char c;
+static char unMYGETC(char c)
 {
   if (LENSTRINGTOPARSE <= PTTOSTRINGTOPARSE)
     return EOF;
@@ -1931,10 +1934,10 @@ look_up_specialfunction(str)
 	  return TRUE;
 	}
       if (strcmp(specialfunction[i],"Dummy") == 0)
-	return NULL;
+	return 0;
     }
   
-  return NULL;
+  return 0;
 }