diff options
| author | Karl Heuer | 1995-03-15 01:49:46 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-03-15 01:49:46 +0000 |
| commit | cd8b5aa3480af3a66537205762bf0331b2e15615 (patch) | |
| tree | 69cec2aa35ca36a9d0d163f2c47ea98e1d22ae92 /src/callint.c | |
| parent | 92b618385eed766d68beb2a6cf579a9977a02b73 (diff) | |
| download | emacs-cd8b5aa3480af3a66537205762bf0331b2e15615.tar.gz emacs-cd8b5aa3480af3a66537205762bf0331b2e15615.zip | |
Rename perdisplay to kboard.
Diffstat (limited to 'src/callint.c')
| -rw-r--r-- | src/callint.c | 70 |
1 files changed, 35 insertions, 35 deletions
diff --git a/src/callint.c b/src/callint.c index 84270ff0c29..c0787ce2913 100644 --- a/src/callint.c +++ b/src/callint.c | |||
| @@ -55,25 +55,25 @@ clear_prefix_arg () | |||
| 55 | Vprefix_arg = Qnil; | 55 | Vprefix_arg = Qnil; |
| 56 | if (!current_prefix_partial) | 56 | if (!current_prefix_partial) |
| 57 | { | 57 | { |
| 58 | current_perdisplay->prefix_factor = Qnil; | 58 | current_kboard->prefix_factor = Qnil; |
| 59 | current_perdisplay->prefix_value = Qnil; | 59 | current_kboard->prefix_value = Qnil; |
| 60 | current_perdisplay->prefix_sign = 1; | 60 | current_kboard->prefix_sign = 1; |
| 61 | current_perdisplay->prefix_partial = 0; | 61 | current_kboard->prefix_partial = 0; |
| 62 | } | 62 | } |
| 63 | } | 63 | } |
| 64 | 64 | ||
| 65 | void | 65 | void |
| 66 | finalize_prefix_arg () | 66 | finalize_prefix_arg () |
| 67 | { | 67 | { |
| 68 | if (!NILP (current_perdisplay->prefix_factor)) | 68 | if (!NILP (current_kboard->prefix_factor)) |
| 69 | Vprefix_arg = Fcons (current_perdisplay->prefix_factor, Qnil); | 69 | Vprefix_arg = Fcons (current_kboard->prefix_factor, Qnil); |
| 70 | else if (NILP (current_perdisplay->prefix_value)) | 70 | else if (NILP (current_kboard->prefix_value)) |
| 71 | Vprefix_arg = (current_perdisplay->prefix_sign > 0 ? Qnil : Qminus); | 71 | Vprefix_arg = (current_kboard->prefix_sign > 0 ? Qnil : Qminus); |
| 72 | else if (current_perdisplay->prefix_sign > 0) | 72 | else if (current_kboard->prefix_sign > 0) |
| 73 | Vprefix_arg = current_perdisplay->prefix_value; | 73 | Vprefix_arg = current_kboard->prefix_value; |
| 74 | else | 74 | else |
| 75 | XSETINT (Vprefix_arg, -XINT (current_perdisplay->prefix_value)); | 75 | XSETINT (Vprefix_arg, -XINT (current_kboard->prefix_value)); |
| 76 | current_perdisplay->prefix_partial = 0; | 76 | current_kboard->prefix_partial = 0; |
| 77 | } | 77 | } |
| 78 | 78 | ||
| 79 | static void | 79 | static void |
| @@ -296,8 +296,8 @@ Otherwise, this is done only if an arg is read using the minibuffer.") | |||
| 296 | } | 296 | } |
| 297 | else if (EQ (funcar, Qmocklisp)) | 297 | else if (EQ (funcar, Qmocklisp)) |
| 298 | { | 298 | { |
| 299 | #ifdef MULTI_PERDISPLAY | 299 | #ifdef MULTI_KBOARD |
| 300 | display_locked = 1; | 300 | kboard_locked = 1; |
| 301 | #endif | 301 | #endif |
| 302 | return ml_apply (fun, Qinteractive); | 302 | return ml_apply (fun, Qinteractive); |
| 303 | } | 303 | } |
| @@ -352,8 +352,8 @@ Otherwise, this is done only if an arg is read using the minibuffer.") | |||
| 352 | Vcommand_history | 352 | Vcommand_history |
| 353 | = Fcons (Fcons (function, values), Vcommand_history); | 353 | = Fcons (Fcons (function, values), Vcommand_history); |
| 354 | } | 354 | } |
| 355 | #ifdef MULTI_PERDISPLAY | 355 | #ifdef MULTI_KBOARD |
| 356 | display_locked = 1; | 356 | kboard_locked = 1; |
| 357 | #endif | 357 | #endif |
| 358 | return apply1 (function, specs); | 358 | return apply1 (function, specs); |
| 359 | } | 359 | } |
| @@ -655,8 +655,8 @@ Otherwise, this is done only if an arg is read using the minibuffer.") | |||
| 655 | if (varies[i] >= 1 && varies[i] <= 4) | 655 | if (varies[i] >= 1 && varies[i] <= 4) |
| 656 | XSETINT (args[i], marker_position (args[i])); | 656 | XSETINT (args[i], marker_position (args[i])); |
| 657 | 657 | ||
| 658 | #ifdef MULTI_PERDISPLAY | 658 | #ifdef MULTI_KBOARD |
| 659 | display_locked = 1; | 659 | kboard_locked = 1; |
| 660 | #endif | 660 | #endif |
| 661 | 661 | ||
| 662 | { | 662 | { |
| @@ -705,17 +705,17 @@ Repeating \\[universal-argument] without digits or minus sign\n\ | |||
| 705 | if (!current_prefix_partial) | 705 | if (!current_prefix_partial) |
| 706 | { | 706 | { |
| 707 | /* First C-u */ | 707 | /* First C-u */ |
| 708 | XSETFASTINT (current_perdisplay->prefix_factor, 4); | 708 | XSETFASTINT (current_kboard->prefix_factor, 4); |
| 709 | current_perdisplay->prefix_value = Qnil; | 709 | current_kboard->prefix_value = Qnil; |
| 710 | current_perdisplay->prefix_sign = 1; | 710 | current_kboard->prefix_sign = 1; |
| 711 | current_perdisplay->prefix_partial = 1; | 711 | current_kboard->prefix_partial = 1; |
| 712 | } | 712 | } |
| 713 | else if (!NILP (current_perdisplay->prefix_factor)) | 713 | else if (!NILP (current_kboard->prefix_factor)) |
| 714 | { | 714 | { |
| 715 | /* Subsequent C-u */ | 715 | /* Subsequent C-u */ |
| 716 | XSETINT (current_perdisplay->prefix_factor, | 716 | XSETINT (current_kboard->prefix_factor, |
| 717 | XINT (current_perdisplay->prefix_factor) * 4); | 717 | XINT (current_kboard->prefix_factor) * 4); |
| 718 | current_perdisplay->prefix_partial = 1; | 718 | current_kboard->prefix_partial = 1; |
| 719 | } | 719 | } |
| 720 | else | 720 | else |
| 721 | { | 721 | { |
| @@ -730,9 +730,9 @@ DEFUN ("negative-argument", Fnegative_argument, Snegative_argument, 0, 0, "", | |||
| 730 | \\[universal-argument] following digits or minus sign ends the argument.") | 730 | \\[universal-argument] following digits or minus sign ends the argument.") |
| 731 | () | 731 | () |
| 732 | { | 732 | { |
| 733 | current_perdisplay->prefix_factor = Qnil; | 733 | current_kboard->prefix_factor = Qnil; |
| 734 | current_perdisplay->prefix_sign *= -1; | 734 | current_kboard->prefix_sign *= -1; |
| 735 | current_perdisplay->prefix_partial = 1; | 735 | current_kboard->prefix_partial = 1; |
| 736 | } | 736 | } |
| 737 | 737 | ||
| 738 | DEFUN ("digit-argument", Fdigit_argument, Sdigit_argument, 0, 0, "", | 738 | DEFUN ("digit-argument", Fdigit_argument, Sdigit_argument, 0, 0, "", |
| @@ -744,12 +744,12 @@ DEFUN ("digit-argument", Fdigit_argument, Sdigit_argument, 0, 0, "", | |||
| 744 | if (!(INTEGERP (last_command_char) | 744 | if (!(INTEGERP (last_command_char) |
| 745 | && (c = (XINT (last_command_char) & 0177)) >= '0' && c <= '9')) | 745 | && (c = (XINT (last_command_char) & 0177)) >= '0' && c <= '9')) |
| 746 | error("digit-argument must be bound to a digit key"); | 746 | error("digit-argument must be bound to a digit key"); |
| 747 | current_perdisplay->prefix_factor = Qnil; | 747 | current_kboard->prefix_factor = Qnil; |
| 748 | if (NILP (current_perdisplay->prefix_value)) | 748 | if (NILP (current_kboard->prefix_value)) |
| 749 | XSETFASTINT (current_perdisplay->prefix_value, 0); | 749 | XSETFASTINT (current_kboard->prefix_value, 0); |
| 750 | XSETINT (current_perdisplay->prefix_value, | 750 | XSETINT (current_kboard->prefix_value, |
| 751 | XINT (current_perdisplay->prefix_value) * 10 + (c - '0')); | 751 | XINT (current_kboard->prefix_value) * 10 + (c - '0')); |
| 752 | current_perdisplay->prefix_partial = 1; | 752 | current_kboard->prefix_partial = 1; |
| 753 | } | 753 | } |
| 754 | 754 | ||
| 755 | syms_of_callint () | 755 | syms_of_callint () |