aboutsummaryrefslogtreecommitdiffstats
path: root/src/json.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/json.c')
-rw-r--r--src/json.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/json.c b/src/json.c
index e5c0dc22179..770b63c1da2 100644
--- a/src/json.c
+++ b/src/json.c
@@ -817,7 +817,7 @@ json_to_lisp (json_t *json, struct json_configuration *conf)
817 size_t size = json_array_size (json); 817 size_t size = json_array_size (json);
818 if (FIXNUM_OVERFLOW_P (size)) 818 if (FIXNUM_OVERFLOW_P (size))
819 overflow_error (); 819 overflow_error ();
820 Lisp_Object result = Fmake_vector (make_fixed_natnum (size), Qunbound); 820 Lisp_Object result = make_vector (size, Qunbound);
821 for (ptrdiff_t i = 0; i < size; ++i) 821 for (ptrdiff_t i = 0; i < size; ++i)
822 ASET (result, i, 822 ASET (result, i,
823 json_to_lisp (json_array_get (json, i), conf)); 823 json_to_lisp (json_array_get (json, i), conf));