Mercurial > hg > xemacs-beta

comparison src/cmds.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 6728e641994e
children 79c6ff3eef26
comparison
equal deleted inserted replaced
866:613552a02607 867:804517e16990
316 } 316 }
317 317
318 return Fdelete_char (make_int (- n), killp); 318 return Fdelete_char (make_int (- n), killp);
319 } 319 }
320 320
321 static void internal_self_insert (Emchar ch, int noautofill); 321 static void internal_self_insert (Ichar ch, int noautofill);
322 322
323 DEFUN ("self-insert-command", Fself_insert_command, 1, 1, "*p", /* 323 DEFUN ("self-insert-command", Fself_insert_command, 1, 1, "*p", /*
324 Insert the character you type. 324 Insert the character you type.
325 Whichever character you type to run this command is inserted. 325 Whichever character you type to run this command is inserted.
326 If a prefix arg COUNT is specified, the character is inserted COUNT times. 326 If a prefix arg COUNT is specified, the character is inserted COUNT times.
327 */ 327 */
328 (count)) 328 (count))
329 { 329 {
330 /* This function can GC */ 330 /* This function can GC */
331 Emchar ch; 331 Ichar ch;
332 Lisp_Object c; 332 Lisp_Object c;
333 EMACS_INT n; 333 EMACS_INT n;
334 334
335 CHECK_NATNUM (count); 335 CHECK_NATNUM (count);
336 n = XINT (count); 336 n = XINT (count);
362 If this insertion is suitable for direct output (completely simple), 362 If this insertion is suitable for direct output (completely simple),
363 return 0. A value of 1 indicates this *might* not have been simple. 363 return 0. A value of 1 indicates this *might* not have been simple.
364 A value of 2 means this did things that call for an undo boundary. */ 364 A value of 2 means this did things that call for an undo boundary. */
365 365
366 static void 366 static void
367 internal_self_insert (Emchar c1, int noautofill) 367 internal_self_insert (Ichar c1, int noautofill)
368 { 368 {
369 /* This function can GC */ 369 /* This function can GC */
370 /* int hairy = 0; -- unused */ 370 /* int hairy = 0; -- unused */
371 REGISTER enum syntaxcode synt; 371 REGISTER enum syntaxcode synt;
372 REGISTER Emchar c2; 372 REGISTER Ichar c2;
373 Lisp_Object overwrite; 373 Lisp_Object overwrite;
374 Lisp_Object syntax_table; 374 Lisp_Object syntax_table;
375 struct buffer *buf = current_buffer; 375 struct buffer *buf = current_buffer;
376 int tab_width; 376 int tab_width;
377 377