From 5536bc56b39384df09015113f80fb36190ca929b Mon Sep 17 00:00:00 2001
From: mccallum <mccallum@72102866-910b-0410-8b05-ffd578937521>
Date: Sat, 15 Apr 1995 19:42:36 +0000
Subject: [PATCH] Fixed typos, and implemented many methods to call behavior
 methods.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@366 72102866-910b-0410-8b05-ffd578937521
---
 Source/NSGCoder.m | 28 ++++++++++++++++++----------
 1 file changed, 18 insertions(+), 10 deletions(-)

diff --git a/Source/NSGCoder.m b/Source/NSGCoder.m
index 34e7074f9..d90fa54e9 100644
--- a/Source/NSGCoder.m
+++ b/Source/NSGCoder.m
@@ -21,12 +21,12 @@
    Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
    */
 
-#include <foundation/NSConcreteArray.h>
+#include <foundation/NSGCoder.h>
 #include <objects/NSCoder.h>
 #include <objects/behavior.h>
 #include <objects/Coder.h>
 
-@implementation NSGNUCoder
+@implementation NSGCoder
 
 + (void) initialize
 {
@@ -51,29 +51,32 @@
 - (void) encodeValueOfObjCType: (const char*)type
    at: (const void*)address;
 {
-  [self notImplemented:_cmd];
+  [self encodeValueOfType:type at:address 
+	withName:NULL];
 }
 
 - (void) encodeObject: (id)anObject;
 {
   [self encodeObject:anObject
-	withName:""];
+	withName:NULL];
 }
 
 - (void) encodeConditionalObject: (id)anObject;
 {
   [self encodeObjectReference:anObject
-	withName:""];
+	withName:NULL];
 }
 
 - (void) encodeBycopyObject: (id)anObject;
 {
-  [self encodeObject:anObject];
+  [self encodeObjectBycopy:anObject 
+	withName:NULL];
 }
 
 - (void) encodeRootObject: (id)rootObject;
 {
-  [self encodeObject];
+  [self encodeRootObject:rootObject 
+	withName:NULL];
 }
 
 
@@ -82,13 +85,18 @@
 - (void) decodeValueOfObjCType: (const char*)type
    at: (void*)address
 {
-  [self notImplemented:_cmd];
+  [self decodeValueOfType:type at:address 
+	withName:NULL];
 }
 
 - (id) decodeObject;
 {
-  [self notImplemented:_cmd];
-  return nil;
+  id o;
+  /* xxx Warning!!! this won't work with encoded object references! 
+     We need to fix this! (But how?) */
+  [self decodeObjectAt:&o 
+	withName:NULL];
+  return o;
 }
 
 // Managing Zones