comparison src/sysfile.h @ 4985:358aa3bb603f

Automatic merge
author Ben Wing <ben@xemacs.org>
date Fri, 05 Feb 2010 12:12:28 -0600
parents 4aebb0131297
children 308d34e9f07d
comparison
equal deleted inserted replaced
4984:f23cd0184dcf 4985:358aa3bb603f
89 fcntl.h, and Martin says that a "conforming" system should never 89 fcntl.h, and Martin says that a "conforming" system should never
90 need this. We will put it back if necessary on systems requiring it. */ 90 need this. We will put it back if necessary on systems requiring it. */
91 /* # include <sys/fcntl.h> */ 91 /* # include <sys/fcntl.h> */
92 #endif /* WIN32_NATIVE */ 92 #endif /* WIN32_NATIVE */
93 93
94 /* Needed for C_STRING_TO_TSTR, MAX_XETCHAR_SIZE below; but syswindows.h 94 /* Needed for ITEXT_TO_TSTR, MAX_XETCHAR_SIZE below; but syswindows.h
95 depends on lisp.h being previously included. */ 95 depends on lisp.h being previously included. */
96 #if defined (WIN32_ANY) && defined (emacs) 96 #if defined (WIN32_ANY) && defined (emacs)
97 # include "syswindows.h" 97 # include "syswindows.h"
98 #endif 98 #endif
99 99
595 #define PATHNAME_CONVERT_OUT_TSTR(path, pathout) \ 595 #define PATHNAME_CONVERT_OUT_TSTR(path, pathout) \
596 do \ 596 do \
597 { \ 597 { \
598 const Ibyte *_pco_path_; \ 598 const Ibyte *_pco_path_; \
599 PATHNAME_RESOLVE_LINKS (path, _pco_path_); \ 599 PATHNAME_RESOLVE_LINKS (path, _pco_path_); \
600 C_STRING_TO_TSTR (_pco_path_, pathout); \ 600 (pathout) = ITEXT_TO_TSTR (_pco_path_); \
601 } while (0) 601 } while (0)
602 602
603 #define PATHNAME_CONVERT_OUT_UTF_8(path, pathout) \ 603 #define PATHNAME_CONVERT_OUT_UTF_8(path, pathout) \
604 do \ 604 do \
605 { \ 605 { \
606 const Ibyte *_pco_path_; \ 606 const Ibyte *_pco_path_; \
607 PATHNAME_RESOLVE_LINKS (path, _pco_path_); \ 607 PATHNAME_RESOLVE_LINKS (path, _pco_path_); \
608 C_STRING_TO_EXTERNAL (_pco_path_, pathout, Qutf_8); \ 608 (pathout) = ITEXT_TO_EXTERNAL (_pco_path_, Qutf_8); \
609 } while (0) 609 } while (0)
610 610
611 #ifdef WIN32_NATIVE 611 #ifdef WIN32_NATIVE
612 #define PATHNAME_CONVERT_OUT(path, pathout) \ 612 #define PATHNAME_CONVERT_OUT(path, pathout) \
613 PATHNAME_CONVERT_OUT_TSTR (path, pathout) 613 PATHNAME_CONVERT_OUT_TSTR (path, pathout)
614 #else 614 #else
615 # define PATHNAME_CONVERT_OUT(path, pathout) \ 615 # define PATHNAME_CONVERT_OUT(path, pathout) \
616 C_STRING_TO_EXTERNAL (path, pathout, Qfile_name) 616 do \
617 { \
618 (pathout) = ITEXT_TO_EXTERNAL (path, Qfile_name); \
619 } while (0)
617 #endif 620 #endif
618 621
619 #define LISP_PATHNAME_CONVERT_OUT(path, pathout) \ 622 #define LISP_PATHNAME_CONVERT_OUT(path, pathout) \
620 PATHNAME_CONVERT_OUT (XSTRING_DATA (path), pathout) 623 PATHNAME_CONVERT_OUT (XSTRING_DATA (path), pathout)
621 624