emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 8e25ffe: Fix integer overflow check in json code


From: Paul Eggert
Subject: [Emacs-diffs] master 8e25ffe: Fix integer overflow check in json code
Date: Tue, 1 Jan 2019 02:36:05 -0500 (EST)

branch: master
commit 8e25ffeec6345249f2a5d221fcb0622d1deaee27
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>

    Fix integer overflow check in json code
    
    * src/json.c (json_to_lisp): Check for ptrdiff_t overflow,
    not fixnum overflow.
---
 src/json.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/json.c b/src/json.c
index 46fb97a..b5fb3fe 100644
--- a/src/json.c
+++ b/src/json.c
@@ -815,7 +815,7 @@ json_to_lisp (json_t *json, struct json_configuration *conf)
         if (++lisp_eval_depth > max_lisp_eval_depth)
           xsignal0 (Qjson_object_too_deep);
         size_t size = json_array_size (json);
-        if (FIXNUM_OVERFLOW_P (size))
+        if (PTRDIFF_MAX < size)
           overflow_error ();
         Lisp_Object result = make_vector (size, Qunbound);
         for (ptrdiff_t i = 0; i < size; ++i)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]