mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-20 10:23:57 +00:00
Code Issues Releases Activity

(ENCODE_SYSTEM, DECODE_SYSTEM) [WINDOWSNT]: New macros.

Browse Source 
[WINDOWSNT]: Add extern for Vw32_system_coding_system.
This commit is contained in:
Jason Rumney 2000-05-30 21:19:39 +00:00
parent ad23de76bf
commit 2dfda96293
1 changed files with 23 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
src/coding.h
View File

@ -591,6 +591,24 @@ struct coding_system
? code_convert_string_norecord (name, Vdefault_file_name_coding_system, 0) \
: name))
#ifdef WINDOWSNT
/* Encode the string STR using the specified coding system
for w32 system functions, if any. */
#define ENCODE_SYSTEM(str) \
(! NILP (Vw32_system_coding_system) \
&& XFASTINT (Vw32_system_coding_system) != 0 \
? code_convert_string_norecord (str, Vw32_system_coding_system, 1) \
: str)
/* Decode the string STR using the specified coding system
for w32 system functions, if any. */
#define DECODE_SYSTEM(name) \
(! NILP (Vw32_system_coding_system) \
&& XFASTINT (Vw32_system_coding_system) != 0 \
? code_convert_string_norecord (str, Vw32_system_coding_system, 0) \
: str)
#endif
/* Extern declarations. */
extern int decode_coding P_ ((struct coding_system *, unsigned char *,
unsigned char *, int, int));
@ -681,6 +699,11 @@ extern Lisp_Object Vfile_name_coding_system;
/* Coding system for file names used only when
Vfile_name_coding_system is nil. */
extern Lisp_Object Vdefault_file_name_coding_system;
#ifdef WINDOWSNT
/* Coding system for w32 system strings, or nil if none. */
extern Lisp_Object Vw32_system_coding_system;
#endif
#endif
#endif /* _CODING_H */