Mercurial > emacs
comparison src/cmds.c @ 21514:fa9ff387d260
Fix -Wimplicit warnings.
| author | Andreas Schwab <schwab@suse.de> |
|---|---|
| date | Tue, 14 Apr 1998 12:25:56 +0000 |
| parents | d25a091700e5 |
| children | 436499b7a769 |
comparison
equal
deleted
inserted
replaced
| 21513:984881b316fc | 21514:fa9ff387d260 |
|---|---|
| 25 #include "buffer.h" | 25 #include "buffer.h" |
| 26 #include "charset.h" | 26 #include "charset.h" |
| 27 #include "syntax.h" | 27 #include "syntax.h" |
| 28 #include "window.h" | 28 #include "window.h" |
| 29 #include "keyboard.h" | 29 #include "keyboard.h" |
| 30 #include "dispextern.h" | |
| 30 | 31 |
| 31 Lisp_Object Qkill_forward_chars, Qkill_backward_chars, Vblink_paren_function; | 32 Lisp_Object Qkill_forward_chars, Qkill_backward_chars, Vblink_paren_function; |
| 32 | 33 |
| 33 /* A possible value for a buffer's overwrite-mode variable. */ | 34 /* A possible value for a buffer's overwrite-mode variable. */ |
| 34 Lisp_Object Qoverwrite_mode_binary; | 35 Lisp_Object Qoverwrite_mode_binary; |
| 324 | 325 |
| 325 If this insertion is suitable for direct output (completely simple), | 326 If this insertion is suitable for direct output (completely simple), |
| 326 return 0. A value of 1 indicates this *might* not have been simple. | 327 return 0. A value of 1 indicates this *might* not have been simple. |
| 327 A value of 2 means this did things that call for an undo boundary. */ | 328 A value of 2 means this did things that call for an undo boundary. */ |
| 328 | 329 |
| 330 int | |
| 329 internal_self_insert (c, noautofill) | 331 internal_self_insert (c, noautofill) |
| 330 int c; | 332 int c; |
| 331 int noautofill; | 333 int noautofill; |
| 332 { | 334 { |
| 333 extern Lisp_Object Fexpand_abbrev (); | 335 extern Lisp_Object Fexpand_abbrev (); |
| 501 return hairy; | 503 return hairy; |
| 502 } | 504 } |
| 503 | 505 |
| 504 /* module initialization */ | 506 /* module initialization */ |
| 505 | 507 |
| 508 void | |
| 506 syms_of_cmds () | 509 syms_of_cmds () |
| 507 { | 510 { |
| 508 Qkill_backward_chars = intern ("kill-backward-chars"); | 511 Qkill_backward_chars = intern ("kill-backward-chars"); |
| 509 staticpro (&Qkill_backward_chars); | 512 staticpro (&Qkill_backward_chars); |
| 510 | 513 |
| 540 defsubr (&Sdelete_backward_char); | 543 defsubr (&Sdelete_backward_char); |
| 541 | 544 |
| 542 defsubr (&Sself_insert_command); | 545 defsubr (&Sself_insert_command); |
| 543 } | 546 } |
| 544 | 547 |
| 548 void | |
| 545 keys_of_cmds () | 549 keys_of_cmds () |
| 546 { | 550 { |
| 547 int n; | 551 int n; |
| 548 | 552 |
| 549 initial_define_key (global_map, Ctl ('I'), "self-insert-command"); | 553 initial_define_key (global_map, Ctl ('I'), "self-insert-command"); |
