don't alloca more than one page in apply()

tknopp · Mar 11, 2014 · ff2f6a1 · ff2f6a1
1 parent 83ccf97
commit ff2f6a1
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/builtins.c b/src/builtins.c
@@ -241,6 +241,7 @@ JL_CALLABLE(jl_f_typeassert)
 }
 
 static jl_function_t *jl_append_any_func;
+extern size_t jl_page_size;
 
 JL_CALLABLE(jl_f_apply)
 {
@@ -295,7 +296,7 @@ JL_CALLABLE(jl_f_apply)
  return result;
  }
  }
- if (n > 64000) {
+ if (n > jl_page_size/sizeof(jl_value_t*)) {
  // put arguments on the heap if there are too many
  argarr = (jl_value_t*)jl_alloc_cell_1d(n);
  newargs = jl_cell_data(argarr);