diff options
author | Doug Evans <dje@gnu.org> | 1994-01-24 23:28:33 +0000 |
---|---|---|
committer | Doug Evans <dje@gnu.org> | 1994-01-24 23:28:33 +0000 |
commit | ff942a982967fec95d6108ce2958306fdbdec959 (patch) | |
tree | 3aa902e1f29a7bbba9619b64087222372545a9f1 /gcc | |
parent | a0a74fda8d82ea0bc8bed0f8c7a092bc5e572291 (diff) | |
download | gcc-ff942a982967fec95d6108ce2958306fdbdec959.zip gcc-ff942a982967fec95d6108ce2958306fdbdec959.tar.gz gcc-ff942a982967fec95d6108ce2958306fdbdec959.tar.bz2 |
#ifdef out uses of TypedStream for the alpha, not supported yet.
From-SVN: r6426
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/objc/Object.h | 4 | ||||
-rw-r--r-- | gcc/objc/Object.m | 8 |
2 files changed, 10 insertions, 2 deletions
diff --git a/gcc/objc/Object.h b/gcc/objc/Object.h index cb370ca..cb409d2 100644 --- a/gcc/objc/Object.h +++ b/gcc/objc/Object.h @@ -112,10 +112,14 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ /* Archiving */ + (int)version; + setVersion:(int)aVersion; + +#ifndef __alpha__ /* TypedStream not supported on alpha yet. */ + (int)streamVersion: (TypedStream*)aStream; - read: (TypedStream*)aStream; - write: (TypedStream*)aStream; +#endif + - awake; @end diff --git a/gcc/objc/Object.m b/gcc/objc/Object.m index 622dcbe..d620948 100644 --- a/gcc/objc/Object.m +++ b/gcc/objc/Object.m @@ -339,15 +339,15 @@ extern int errno; return self; } +#ifndef __alpha__ /* TypedStream not supported on alpha yet. */ + (int)streamVersion: (TypedStream*)aStream { -#ifndef __alpha__ if (aStream->mode == OBJC_READONLY) return objc_get_stream_class_version (aStream, self); else -#endif return class_get_version (self); } +#endif // These are used to write or read the instance variables // declared in this particular part of the object. Subclasses @@ -355,17 +355,21 @@ extern int errno; // before doing their own archiving. These methods are private, in // the sense that they should only be called from subclasses. +#ifndef __alpha__ - read: (TypedStream*)aStream { // [super read: aStream]; return self; } +#endif +#ifndef __alpha__ - write: (TypedStream*)aStream { // [super write: aStream]; return self; } +#endif - awake { |