changeset 9360:100b1d83e06f

(Lisp_Internal_Stream, XSETINTERNALSTREAM, INTERNALSTREAMP): Deleted.
author Karl Heuer <kwzh@gnu.org>
date Thu, 06 Oct 1994 21:47:34 +0000
parents 36dea2dad76c
children c11cc966dc6a
files src/lisp.h
diffstat 1 files changed, 0 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/src/lisp.h	Thu Oct 06 21:47:12 1994 +0000
+++ b/src/lisp.h	Thu Oct 06 21:47:34 1994 +0000
@@ -97,12 +97,6 @@
     Lisp_Frame,
 #endif
 
-    /* Used when a FILE * value needs to be passed
-       in an argument of type Lisp_Object.
-       You must do *(FILE **) XPNTR(obj) to get the value.
-       The user will never see this data type. */
-    Lisp_Internal_Stream,
-
     /* Used in a symbol value cell when the symbol's value is per-buffer.
        The actual contents are a cons cell which starts a list like this:
        (REALVALUE BUFFER CURRENT-ALIST-ELEMENT . DEFAULT-VALUE).
@@ -454,7 +448,6 @@
 #define XSETBOOLFWD(a, b) XSET (a, Lisp_Boolfwd, b)
 #define XSETBUFFER_OBJFWD(a, b) XSET (a, Lisp_Buffer_Objfwd, b)
 #define XSETWINDOW_CONFIGURATION(a, b) XSET (a, Lisp_Window_Configuration, b)
-#define XSETINTERNAL_STREAM(a, b) XSET (a, Lisp_Internal_Stream, b)
 #define XSETINTFWD(a, b) XSET (a, Lisp_Intfwd, b)
 
 #ifdef USE_TEXT_PROPERTIES
@@ -724,7 +717,6 @@
 #define BOOLFWDP(x) (XTYPE ((x)) == Lisp_Boolfwd)
 #define INTFWDP(x) (XTYPE ((x)) == Lisp_Intfwd)
 #define OBJFWDP(x) (XTYPE ((x)) == Lisp_Objfwd)
-#define INTERNAL_STREAMP(x) (XTYPE ((x)) == Lisp_Internal_Stream)
 #define BUFFER_LOCAL_VALUEP(x) (XTYPE ((x)) == Lisp_Buffer_Local_Value)
 #define SOME_BUFFER_LOCAL_VALUEP(x) (XTYPE ((x)) == Lisp_Some_Buffer_Local_Value)
 #define BUFFER_OBJFWDP(x) (XTYPE ((x)) == Lisp_Buffer_Objfwd)