Fix compiler warnings

JuliaLang · Jun 17, 2015 · d5e67c2 · d5e67c2
1 parent dbe94d1
commit d5e67c2
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/flisp/flisp.c b/src/flisp/flisp.c
@@ -2248,7 +2248,7 @@ value_t fl_map1(value_t *args, u_int32_t nargs)
  if (!iscons(args[1])) return NIL;
  value_t v;
  uint32_t first, last, argSP = args-Stack;
- assert(argSP >= 0 && argSP < N_STACK);
+ assert(args >= Stack && argSP < N_STACK);
  if (nargs == 2) {
  if (SP+4 > N_STACK) grow_stack();
  PUSH(Stack[argSP]);

diff --git a/test/ccalltest.c b/test/ccalltest.c
@@ -31,7 +31,7 @@ testUcharX(unsigned char x) {
 
 #define xstr(s) str(s)
 #define str(s) #s
-volatile int (*fptr)(unsigned char x);
+int (*volatile fptr)(unsigned char x);
 volatile int a;
 volatile int b;
 
@@ -348,7 +348,7 @@ int main() {
  fprintf(stderr,"all of the following should be 1 except xs[259] = 0\n");
  a = 3;
  b = 259;
- fptr = (volatile int (*)(unsigned char x))&testUcharX;
+ fptr = (int (*)(unsigned char x))&testUcharX;
  if ((((size_t)fptr)&((size_t)1)) == 1) fptr = NULL;
  fprintf(stderr,"compiled with: '%s'\nxs[3] = %d\nxs[259] = %d\ntestUcharX(3) = %d\ntestUcharX(%d) = %d\nfptr(3) = %d\nfptr(259) = %d\n",
  xstr(CC), xs[a], xs[b], testUcharX(a), b, testUcharX((unsigned char)b), fptr(a), fptr(b));