From: Andrea Corallo <andrea_corallo@yahoo.it>
Date: Mon, 10 Jun 2019 08:33:25 +0000 (+0200)
Subject: allow + in lisp functions to be compiled
X-Git-Tag: emacs-28.0.90~2727^2~1500
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f867699b23ad012ad71f08f88ecf3e0e8df045da;p=emacs.git

allow + in lisp functions to be compiled
---

diff --git a/src/comp.c b/src/comp.c
index 7de222b5b2b..ede417c794f 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -1540,7 +1540,8 @@ DEFUN ("native-compile", Fnative_compile, Snative_compile,
   char *c = c_f_name;
   while (*c)
     {
-      if (*c == '-')
+      if (*c == '-' ||
+	  *c == '+')
 	*c = '_';
       ++c;
     }