diff options
| author | Paul Eggert | 2015-01-14 00:42:15 -0800 |
|---|---|---|
| committer | Paul Eggert | 2015-01-14 00:42:48 -0800 |
| commit | d4b352af3e7d5c1afc719fb1f8c7c578642d8250 (patch) | |
| tree | 0d6db56b3f30c316af5791c1944ee1c3c5736f64 /src/process.c | |
| parent | d7e26b44109f4068d41a075fa89d11c1a8156f66 (diff) | |
| download | emacs-d4b352af3e7d5c1afc719fb1f8c7c578642d8250.tar.gz emacs-d4b352af3e7d5c1afc719fb1f8c7c578642d8250.zip | |
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.
Diffstat (limited to 'src/process.c')
| -rw-r--r-- | src/process.c | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/src/process.c b/src/process.c index 166bf851a8e..77c94f29211 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -3827,6 +3827,18 @@ Data that is unavailable is returned as nil. */) | |||
| 3827 | #endif | 3827 | #endif |
| 3828 | } | 3828 | } |
| 3829 | 3829 | ||
| 3830 | /* If program file NAME starts with /: for quoting a magic | ||
| 3831 | name, remove that, preserving the multibyteness of NAME. */ | ||
| 3832 | |||
| 3833 | Lisp_Object | ||
| 3834 | remove_slash_colon (Lisp_Object name) | ||
| 3835 | { | ||
| 3836 | return | ||
| 3837 | ((SBYTES (name) > 2 && SREF (name, 0) == '/' && SREF (name, 1) == ':') | ||
| 3838 | ? make_specified_string (SSDATA (name) + 2, SCHARS (name) - 2, | ||
| 3839 | SBYTES (name) - 2, STRING_MULTIBYTE (name)) | ||
| 3840 | : name); | ||
| 3841 | } | ||
| 3830 | 3842 | ||
| 3831 | /* Turn off input and output for process PROC. */ | 3843 | /* Turn off input and output for process PROC. */ |
| 3832 | 3844 | ||