/[gcl]/gcl/o/xdrfuns.c
ViewVC logotype

Diff of /gcl/o/xdrfuns.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4.2.1.4.1 by camm, Sun Sep 14 02:30:45 2003 UTC revision 1.4.2.1.4.2 by camm, Thu Nov 6 16:16:54 2003 UTC
# Line 23  License for more details. Line 23  License for more details.
23  #include <rpc/rpc.h>  #include <rpc/rpc.h>
24    
25  extern short aet_sizes[];  extern short aet_sizes[];
26  object  static object
27  siGxdr_open(f)  FFN(siGxdr_open)(f)
28       object f;       object f;
29  { XDR *xdrs;  { XDR *xdrs;
30    object ar= alloc_simple_string(sizeof(XDR));    object ar= alloc_simple_string(sizeof(XDR));
# Line 39  siGxdr_open(f) Line 39  siGxdr_open(f)
39    return ar;    return ar;
40  }  }
41    
42  object  static object
43  siGxdr_write(object str,object elt) {  FFN(siGxdr_write)(object str,object elt) {
44    
45    XDR *xdrp= (XDR *) str->ust.ust_self;    XDR *xdrp= (XDR *) str->ust.ust_self;
46    xdrproc_t e;    xdrproc_t e;
# Line 92  siGxdr_write(object str,object elt) { Line 92  siGxdr_write(object str,object elt) {
92    return elt;    return elt;
93  }  }
94    
95  object  static object
96  siGxdr_read(object str,object elt) {  FFN(siGxdr_read)(object str,object elt) {
97    
98    XDR *xdrp= (XDR *) str->ust.ust_self;    XDR *xdrp= (XDR *) str->ust.ust_self;
99    xdrproc_t e;    xdrproc_t e;

Legend:
Removed from v.1.4.2.1.4.1  
changed lines
  Added in v.1.4.2.1.4.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26