From cd7475541a9831458c30a5a3adb505b0332837f9 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Wed, 18 Jan 2023 12:13:55 +0100
Subject: Fix argument number in 'spawn' type check.

* libguile/posix.c (scm_spawn_process): Fix argument number in
'SCM_VALIDATE_NONEMPTYLIST'.
---
 libguile/posix.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libguile/posix.c b/libguile/posix.c
index ae9792890..3f7207bbc 100644
--- a/libguile/posix.c
+++ b/libguile/posix.c
@@ -1447,7 +1447,7 @@ SCM_DEFINE (scm_spawn_process, "spawn", 2, 0, 1,
      point to a filename string that is associated with the process
      image being started" (see
      <https://pubs.opengroup.org/onlinepubs/9699919799/functions/posix_spawn.html>). */
-  SCM_VALIDATE_NONEMPTYLIST (1, arguments);
+  SCM_VALIDATE_NONEMPTYLIST (2, arguments);
 
   env = SCM_UNDEFINED;
   in_scm = SCM_UNDEFINED;
-- 
cgit v1.2.1