[Emacs-diffs] master d4b352a: remove_slash_colon need not be inline

[Paul Eggert]

branch: master
commit d4b352af3e7d5c1afc719fb1f8c7c578642d8250
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>

    remove_slash_colon need not be inline
    
    * process.c, process.h (remove_slash_colon): No longer inline.
    This saves text bytes without hurting runtime performance.
---
 src/ChangeLog |    6 ++++++
 src/process.c |   12 ++++++++++++
 src/process.h |   13 +------------
 3 files changed, 19 insertions(+), 12 deletions(-)

diff --git a/src/ChangeLog b/src/ChangeLog
index 1267816..3523ea4 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,9 @@
+2015-01-14  Paul Eggert  <address@hidden>
+
+       remove_slash_colon need not be inline
+       * process.c, process.h (remove_slash_colon): No longer inline.
+       This saves text bytes without hurting runtime performance.
+
 2015-01-14  Dmitry Antipov  <address@hidden>
 
        Avoid extra multibyteness check in ENCODE_FILE users.
diff --git a/src/process.c b/src/process.c
index 166bf85..77c94f2 100644
--- a/src/process.c
+++ b/src/process.c
@@ -3827,6 +3827,18 @@ Data that is unavailable is returned as nil.  */)
 #endif
 }
 
+/* If program file NAME starts with /: for quoting a magic
+   name, remove that, preserving the multibyteness of NAME.  */
+
+Lisp_Object
+remove_slash_colon (Lisp_Object name)
+{
+  return
+    ((SBYTES (name) > 2 && SREF (name, 0) == '/' && SREF (name, 1) == ':')
+     ? make_specified_string (SSDATA (name) + 2, SCHARS (name) - 2,
+                             SBYTES (name) - 2, STRING_MULTIBYTE (name))
+     : name);
+}
 
 /* Turn off input and output for process PROC.  */
 
diff --git a/src/process.h b/src/process.h
index 58b1dae..36979dc 100644
--- a/src/process.h
+++ b/src/process.h
@@ -237,17 +237,6 @@ extern Lisp_Object network_interface_list (void);
 extern Lisp_Object network_interface_info (Lisp_Object);
 #endif
 
-/* If program file NAME starts with /: for quoting a magic
-   name, remove that, preserving the multibyteness of NAME.  */
-
-INLINE Lisp_Object
-remove_slash_colon (Lisp_Object name)
-{
-  return
-    ((SBYTES (name) > 2 && SREF (name, 0) == '/' && SREF (name, 1) == ':')
-     ? make_specified_string (SSDATA (name) + 2, SCHARS (name) - 2,
-                             SBYTES (name) - 2, STRING_MULTIBYTE (name))
-     : name);
-}
+extern Lisp_Object remove_slash_colon (Lisp_Object);
 
 INLINE_HEADER_END