Mercurial > hg > xemacs-beta

comparison src/console-msw.c @ 867:804517e16990

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-06-05 09:54:39 by ben] Textual renaming: text/char names abbrev.c, alloc.c, buffer.c, buffer.h, bytecode.c, callint.c, casefiddle.c, casetab.c, charset.h, chartab.c, chartab.h, cmds.c, console-gtk.h, console-msw.c, console-msw.h, console-stream.c, console-tty.c, console-x.c, console-x.h, console.h, data.c, device-msw.c, device-x.c, dialog-msw.c, dired-msw.c, dired.c, doc.c, doprnt.c, editfns.c, eldap.c, emodules.c, eval.c, event-Xt.c, event-gtk.c, event-msw.c, event-stream.c, event-unixoid.c, events.c, events.h, file-coding.c, file-coding.h, fileio.c, filelock.c, fns.c, font-lock.c, frame-gtk.c, frame-msw.c, frame-x.c, frame.c, glyphs-eimage.c, glyphs-msw.c, glyphs-x.c, glyphs.c, glyphs.h, gpmevent.c, gui-x.c, gui-x.h, gui.c, gui.h, hpplay.c, indent.c, insdel.c, insdel.h, intl-win32.c, keymap.c, line-number.c, line-number.h, lisp-disunion.h, lisp-union.h, lisp.h, lread.c, lrecord.h, lstream.c, lstream.h, md5.c, menubar-msw.c, menubar-x.c, menubar.c, minibuf.c, mule-ccl.c, mule-charset.c, mule-coding.c, mule-wnnfns.c, ndir.h, nt.c, objects-gtk.c, objects-gtk.h, objects-msw.c, objects-tty.c, objects-x.c, objects.c, objects.h, postgresql.c, print.c, process-nt.c, process-unix.c, process.c, procimpl.h, realpath.c, redisplay-gtk.c, redisplay-msw.c, redisplay-output.c, redisplay-tty.c, redisplay-x.c, redisplay.c, redisplay.h, regex.c, search.c, select-common.h, select-gtk.c, select-x.c, sound.h, symbols.c, syntax.c, syntax.h, sysdep.c, sysdep.h, sysdir.h, sysfile.h, sysproc.h, syspwd.h, systime.h, syswindows.h, termcap.c, tests.c, text.c, text.h, toolbar-common.c, tooltalk.c, ui-gtk.c, unexnt.c, unicode.c, win32.c: Text/char naming rationalization. [a] distinguish between "charptr" when it refers to operations on the pointer itself and when it refers to operations on text; and [b] use consistent naming for everything referring to internal format, i.e. Itext == text in internal format Ibyte == a byte in such text Ichar == a char as represented in internal character format thus e.g. set_charptr_emchar -> set_itext_ichar The pre and post tags on either side of this change are: pre-internal-format-textual-renaming post-internal-format-textual-renaming See the Internals Manual for details of exactly how this was done, how to handle the change in your workspace, etc.
author ben
date Wed, 05 Jun 2002 09:58:45 +0000
parents a5954632b187
children 79c6ff3eef26
comparison
equal deleted inserted replaced
866:613552a02607 867:804517e16990
90 /* Based on Microsoft KB article Q124103 */ 90 /* Based on Microsoft KB article Q124103 */
91 static HWND 91 static HWND
92 GetConsoleHwnd (void) 92 GetConsoleHwnd (void)
93 { 93 {
94 HWND hwndFound; 94 HWND hwndFound;
95 Intbyte newtitleint[200]; 95 Ibyte newtitleint[200];
96 Extbyte *newtitle; 96 Extbyte *newtitle;
97 Extbyte *oldtitle; 97 Extbyte *oldtitle;
98 int numchars; 98 int numchars;
99 99
100 /* fetch current window title */ 100 /* fetch current window title */
232 } 232 }
233 233
234 int mswindows_message_outputted; 234 int mswindows_message_outputted;
235 235
236 int 236 int
237 mswindows_output_console_string (const Intbyte *ptr, Bytecount len) 237 mswindows_output_console_string (const Ibyte *ptr, Bytecount len)
238 { 238 {
239 DWORD num_written; 239 DWORD num_written;
240 240
241 mswindows_message_outputted = 1; 241 mswindows_message_outputted = 1;
242 mswindows_ensure_console_buffered (); 242 mswindows_ensure_console_buffered ();
268 inhibits GC. */ 268 inhibits GC. */
269 write_string_to_mswindows_debugging_output 269 write_string_to_mswindows_debugging_output
270 (XSTRING_DATA (char_or_string), XSTRING_LENGTH (char_or_string)); 270 (XSTRING_DATA (char_or_string), XSTRING_LENGTH (char_or_string));
271 else 271 else
272 { 272 {
273 Intbyte str[MAX_EMCHAR_LEN]; 273 Ibyte str[MAX_ICHAR_LEN];
274 Bytecount len; 274 Bytecount len;
275 275
276 CHECK_CHAR_COERCE_INT (char_or_string); 276 CHECK_CHAR_COERCE_INT (char_or_string);
277 len = set_charptr_emchar (str, XCHAR (char_or_string)); 277 len = set_itext_ichar (str, XCHAR (char_or_string));
278 write_string_to_mswindows_debugging_output (str, len); 278 write_string_to_mswindows_debugging_output (str, len);
279 } 279 }
280 280
281 return char_or_string; 281 return char_or_string;
282 } 282 }
283 283
284 void 284 void
285 write_string_to_mswindows_debugging_output (Intbyte *str, Bytecount len) 285 write_string_to_mswindows_debugging_output (Ibyte *str, Bytecount len)
286 { 286 {
287 const Extbyte *extptr; 287 const Extbyte *extptr;
288 if (initialized && !inhibit_non_essential_printing_operations) 288 if (initialized && !inhibit_non_essential_printing_operations)
289 { 289 {
290 TO_EXTERNAL_FORMAT (DATA, (str, len), 290 TO_EXTERNAL_FORMAT (DATA, (str, len),
336 DCONSCDR (Lisp_Object obj) 336 DCONSCDR (Lisp_Object obj)
337 { 337 {
338 return (CONSP (obj) && CONSP (XCDR (obj))) ? XCONS (XCDR (obj)) : 0; 338 return (CONSP (obj) && CONSP (XCDR (obj))) ? XCONS (XCDR (obj)) : 0;
339 } 339 }
340 340
341 Intbyte *DSTRING (Lisp_Object obj); 341 Ibyte *DSTRING (Lisp_Object obj);
342 Intbyte * 342 Ibyte *
343 DSTRING (Lisp_Object obj) 343 DSTRING (Lisp_Object obj)
344 { 344 {
345 return STRINGP (obj) ? XSTRING_DATA (obj) : NULL; 345 return STRINGP (obj) ? XSTRING_DATA (obj) : NULL;
346 } 346 }
347 347
357 DSYMBOL (Lisp_Object obj) 357 DSYMBOL (Lisp_Object obj)
358 { 358 {
359 return SYMBOLP (obj) ? XSYMBOL (obj) : NULL; 359 return SYMBOLP (obj) ? XSYMBOL (obj) : NULL;
360 } 360 }
361 361
362 Intbyte *DSYMNAME (Lisp_Object obj); 362 Ibyte *DSYMNAME (Lisp_Object obj);
363 Intbyte * 363 Ibyte *
364 DSYMNAME (Lisp_Object obj) 364 DSYMNAME (Lisp_Object obj)
365 { 365 {
366 return SYMBOLP (obj) ? XSTRING_DATA (XSYMBOL (obj)->name) : NULL; 366 return SYMBOLP (obj) ? XSTRING_DATA (XSYMBOL (obj)->name) : NULL;
367 } 367 }
368 368