summaryrefslogtreecommitdiff
path: root/math/R/patches/patch-src_main_character.c
blob: 423b8c46d10674e0da9d6396eabb99ee41370027 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
$NetBSD: patch-src_main_character.c,v 1.5 2021/06/13 13:10:47 wen Exp $

--- src/main/character.c.orig	2021-06-13 06:56:55.454092033 +0000
+++ src/main/character.c
@@ -1744,7 +1744,7 @@ SEXP attribute_hidden do_strtrim(SEXP ca
     return s;
 }
 
-static int strtoi(SEXP s, int base)
+static int my_strtoi(SEXP s, int base)
 {
     if(s == NA_STRING || CHAR(s)[0] == '\0') return(NA_INTEGER);
 
@@ -1777,7 +1777,7 @@ SEXP attribute_hidden do_strtoi(SEXP cal
 
     PROTECT(ans = allocVector(INTSXP, n = LENGTH(x)));
     for(i = 0; i < n; i++)
-	INTEGER(ans)[i] = strtoi(STRING_ELT(x, i), base);
+	INTEGER(ans)[i] = my_strtoi(STRING_ELT(x, i), base);
     UNPROTECT(1);
 
     return ans;