Mercurial > emacs
comparison src/eval.c @ 84436:b1c7d00cbbb0
(Fcommandp): Change `->prompt' to `->intspec'.
| author | Michaël Cadilhac <michael.cadilhac@lrde.org> |
|---|---|
| date | Mon, 10 Sep 2007 09:41:03 +0000 |
| parents | 2a69b973fae2 |
| children | 96f382c71120 |
comparison
equal
deleted
inserted
replaced
| 84435:12dc4aa162c7 | 84436:b1c7d00cbbb0 |
|---|---|
| 2076 } | 2076 } |
| 2077 | 2077 |
| 2078 /* Emacs primitives are interactive if their DEFUN specifies an | 2078 /* Emacs primitives are interactive if their DEFUN specifies an |
| 2079 interactive spec. */ | 2079 interactive spec. */ |
| 2080 if (SUBRP (fun)) | 2080 if (SUBRP (fun)) |
| 2081 return XSUBR (fun)->prompt ? Qt : if_prop; | 2081 return XSUBR (fun)->intspec ? Qt : if_prop; |
| 2082 | 2082 |
| 2083 /* Bytecode objects are interactive if they are long enough to | 2083 /* Bytecode objects are interactive if they are long enough to |
| 2084 have an element whose index is COMPILED_INTERACTIVE, which is | 2084 have an element whose index is COMPILED_INTERACTIVE, which is |
| 2085 where the interactive spec is stored. */ | 2085 where the interactive spec is stored. */ |
| 2086 else if (COMPILEDP (fun)) | 2086 else if (COMPILEDP (fun)) |