gnustep/libs-base
0
0
Fork 0
mirror of https://github.com/gnustep/libs-base.git synced 2025-04-22 16:33:29 +00:00
Code Issues Projects Releases Packages Wiki Activity

([Coder -writeSignature]): Write directly to stream ivar.

Browse source 
([Coder +readSignatureFromCStream:getClassname:PtrformatVersion:]):
Likewise.
([Coder -initForReadingFromStream:s]): New method.
([Coder -initForWritingToStream:s]): New method.
([Coder +coderWritingToStream:]): New method.
([Coder +coderWritingToFile:]): New method.


git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@784 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Andrew McCallum 1996-01-24 03:12:36 +00:00
parent b107d324d1
commit b8d4d350c0
1 changed files with 31 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

36
Source/Coder.m
View file

@ -133,10 +133,10 @@ my_object_is_class(id object)
- (void) writeSignature
{
/* Careful: the string should not contain newlines. */
[cstream writeFormat:
@"GNU Objective C Class Library %s version %d\n",
objects_get_class_name(self),
format_version];
[[cstream stream] writeFormat:
@"GNU Objective C Class Library %s version %d\n",
object_get_class_name(self),
format_version];
}
+ (void) readSignatureFromCStream: (id <CStreaming>) cs
@ -145,7 +145,7 @@ my_object_is_class(id object)
{
int got;
got = [cs readFormat: @"GNU %a version %d\n", namePtr, version];
got = [[cs stream] readFormat: @"GNU %a version %d\n", namePtr, version];
if (got != 2)
[NSException raise:CoderSignatureMalformedException
format:@"Coder found a malformed signature"];
@ -216,6 +216,12 @@ my_object_is_class(id object)
return self;
}
- initForReadingFromStream: (id <Streaming>) s
{
return [self initForReadingFromStream: s
formatVersion: DEFAULT_FORMAT_VERSION];
}
- initForWritingToStream: (id <Streaming>) s
formatVersion: (int) version
{
@ -224,6 +230,26 @@ my_object_is_class(id object)
formatVersion: version
isDecoding: NO];
[self writeSignature];
return self;
}
- initForWritingToStream: (id <Streaming>) s
{
return [self initForWritingToStream: s
formatVersion: DEFAULT_FORMAT_VERSION];
}
+ coderWritingToStream: (id <Streaming>)s
{
return [[[self alloc] initForWritingToStream: s]
autorelease];
}
+ coderWritingToFile: (id <String>)filename
{
return [self coderWritingToStream:
[StdioStream streamWithFilename: filename
fmode: "w"]];
}
- init