]> code.delx.au - gnu-emacs/blobdiff - src/process.h
remove_slash_colon need not be inline
[gnu-emacs] / src / process.h
index 58b1daecfe6c8d2ff2fbe4ae439382f9a7681ca7..36979dcac9e9d8b0d8a94da2155b3503bab88681 100644 (file)
@@ -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