Commit a1d7405c by Kresten Krab Thorup

Take out archiving for alpha

From-SVN: r4230
parent 0f7b4f69
...@@ -207,7 +207,8 @@ object_get_meta_class(id object) ...@@ -207,7 +207,8 @@ object_get_meta_class(id object)
} }
static inline Class_t static inline Class_t
object_get_super_class(id object) object_get_super_class
(id object)
{ {
return ((object!=nil)?(CLS_ISCLASS(object->class_pointer) return ((object!=nil)?(CLS_ISCLASS(object->class_pointer)
?object->class_pointer->super_class ?object->class_pointer->super_class
...@@ -235,8 +236,11 @@ object_is_meta_class(id object) ...@@ -235,8 +236,11 @@ object_is_meta_class(id object)
return CLS_ISMETA((Class_t)object); return CLS_ISMETA((Class_t)object);
} }
/* Archiving stuff */ /* Archiving stuff */
#ifndef __alpha__
typedef int (*objc_typed_read_func)(void*, char*, int); typedef int (*objc_typed_read_func)(void*, char*, int);
typedef int (*objc_typed_write_func)(void*, const char*, int); typedef int (*objc_typed_write_func)(void*, const char*, int);
typedef int (*objc_typed_flush_func)(void*); typedef int (*objc_typed_flush_func)(void*);
...@@ -332,5 +336,5 @@ void objc_close_typed_stream (TypedStream* stream); ...@@ -332,5 +336,5 @@ void objc_close_typed_stream (TypedStream* stream);
BOOL objc_end_of_typed_stream (TypedStream* stream); BOOL objc_end_of_typed_stream (TypedStream* stream);
void objc_flush_typed_stream (TypedStream* stream); void objc_flush_typed_stream (TypedStream* stream);
#endif /* __alpha__ */
#endif /* not __objc_api_INCLUDE_GNU */ #endif /* not __objc_api_INCLUDE_GNU */
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment