//
// Object.cc
//
-// Copyright 1996-2002 Glyph & Cog, LLC
+// Copyright 1996-2003 Glyph & Cog, LLC
//
//========================================================================
-#ifdef __GNUC__
+#include <aconf.h>
+
+#ifdef USE_GCC_PRAGMAS
#pragma implementation
#endif
-#include <aconf.h>
#include <stddef.h>
#include "Object.h"
#include "Array.h"
return this;
}
+Object *Object::initDict(Dict *dictA) {
+ initObj(objDict);
+ dict = dictA;
+ dict->incRef();
+ return this;
+}
+
Object *Object::initStream(Stream *streamA) {
initObj(objStream);
stream = streamA;
break;
case objString:
fprintf(f, "(");
- fwrite(string->getCString(), 1, string->getLength(), stdout);
+ fwrite(string->getCString(), 1, string->getLength(), f);
fprintf(f, ")");
break;
case objName: