home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / c / objam01.lha / objam / test / fooObject.m < prev    next >
Encoding:
Text File  |  1994-10-24  |  396 b   |  32 lines
  1. #include <objc/objc.h>
  2. #include "fooObject.h"
  3.  
  4. @implementation FooObject
  5.  
  6. - setFoo:(unsigned int)val
  7. {
  8.   foo=val;
  9.   return self;
  10. }
  11.  
  12. - (unsigned int)getFoo
  13. {
  14.   return foo;
  15. }
  16.  
  17. - read:(TypedStream*)stream
  18. {
  19.   [super read:stream];
  20.   objc_read_types(stream,"I",&foo);
  21.   return self;
  22. }
  23.  
  24. - write:(TypedStream*)stream
  25. {
  26.   [super write:stream];
  27.   objc_write_types(stream,"I",&foo);
  28.   return self;
  29. }
  30.  
  31. @end
  32.