From adace6ba086582a4bf8fd916cff202eb533c5e51 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= <daniel@turtleware.eu>
Date: Fri, 19 Jul 2019 12:45:09 +0200
Subject: [PATCH] cmp: replace magic number with a defined constant

The magic number was wrong anyway.
---
 src/cmp/cmplam.lsp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/cmp/cmplam.lsp b/src/cmp/cmplam.lsp
index 39360a702..5cb9aadea 100644
--- a/src/cmp/cmplam.lsp
+++ b/src/cmp/cmplam.lsp
@@ -429,7 +429,7 @@ The function thus belongs to the type of functions that ecl_make_cfun accepts."
                     (format nil "lex~D" (1- *level*)))
                    (t "narg"))))
       (if (setq simple-varargs (and (not (or rest keywords allow-other-keys))
-                                    (< (+ nreq nopt) 30)))
+                                    (<= (+ nreq nopt) si::c-arguments-limit)))
           (wt-nl "va_list args; va_start(args,"
                  (last-variable)
                  ");")