Mercurial > emacs
changeset 3482:ff3960b885c9
[!MULTI_FRAME] (Fframep): New dummy definition.
(syms_of_frame): Defsubr that.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 04 Jun 1993 18:42:12 +0000 |
| parents | 56424e6245c2 |
| children | 965b015a4aef |
| files | src/frame.c |
| diffstat | 1 files changed, 11 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/frame.c Fri Jun 04 18:08:07 1993 +0000 +++ b/src/frame.c Fri Jun 04 18:42:12 1993 +0000 @@ -1556,6 +1556,16 @@ XFASTINT (tem) = 0; return tem; } +DEFUN ("framep", Fframep, Sframep, 1, 1, 0, + "Return non-nil if OBJECT is a frame.\n\ +Value is t for a termcap frame (a character-only terminal),\n\ +`x' for an Emacs frame that is really an X window.\n\ +Also see `live-frame-p'.") + (object) + Lisp_Object object; +{ + return Qnil; +} DEFUN ("set-frame-height", Fset_frame_height, Sset_frame_height, 2, 3, 0, "Specify that the frame FRAME has LINES lines.\n\ @@ -1692,6 +1702,7 @@ syms_of_frame () { defsubr (&Sselected_frame); + defsubr (&Sframep); defsubr (&Sframe_char_height); defsubr (&Sframe_char_width); defsubr (&Sframe_pixel_height);