diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-06-20 11:43:08 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-06-20 11:43:54 +0200 |
| commit | 8cf7b06d24162d542d8fddb4f88287f1f7754bbb (patch) | |
| tree | faaa2151b04e73fa5836aa254fe9a8c0b48bb67c /libguile | |
| parent | d59dc5fbf2b36d841db35b8d3816d4da92a568a2 (diff) | |
Copy terminating zero in 'scm_cat_path'.
* libguile/script.c (scm_cat_path): Pass N + 1, not N, to 'strncat'.
Reported by GCC 9.1.0.
Diffstat (limited to 'libguile')
| -rw-r--r-- | libguile/script.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/script.c b/libguile/script.c index 63fbb0f3f..30d3c9b50 100644 --- a/libguile/script.c +++ b/libguile/script.c @@ -1,4 +1,4 @@ -/* Copyright (C) 1994-1998, 2000-2011, 2013, 2014 Free Software Foundation, Inc. +/* Copyright (C) 1994-1998, 2000-2011, 2013, 2014, 2019 Free Software Foundation, Inc. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public License @@ -73,7 +73,7 @@ scm_cat_path (char *str1, const char *str2, long n) if (!str1) return 0L; str1[0] = 0; - strncat (str1, str2, n); + strncat (str1, str2, n + 1); return str1; } |