[Ooc-checkins] libpobj/src/PObj CodeGen.Mod,1.43,1.44

[Michael v. A. <mv...@us...>]

Update of /cvsroot/ooc/libpobj/src/PObj
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22986/src/PObj

Modified Files:
	CodeGen.Mod 
Log Message:
(FormMetaData) Fix order of arguments passed to constructor.  The
2.1.2 string conversion bug caused this bug to go by undetected.


Index: CodeGen.Mod
===================================================================
RCS file: /cvsroot/ooc/libpobj/src/PObj/CodeGen.Mod,v
retrieving revision 1.43
retrieving revision 1.44
diff -u -d -r1.43 -r1.44
--- CodeGen.Mod	28 Jun 2004 21:50:13 -0000	1.43
+++ CodeGen.Mod	30 Jun 2004 18:30:32 -0000	1.44
@@ -871,13 +871,13 @@
     sb.Append("    ");
     sb.Append(varName);
     sb.Append(' := NEW(PObjMD.FormDecl, NIL, ');  (* FIXME... add baseForm *)
-    sb.Append(QuotedString(form.name));
-    sb.Append(', ');
     IF (form.baseForm = NIL) THEN
       sb.Append("NIL");
     ELSE
       sb.Append(form.baseForm.Name(form.module, MetaData.formDescriptor));
     END;
+    sb.Append(', ');
+    sb.Append(QuotedString(form.name));
     ASSERT(LEN(form.entries^) = LEN(form.entriesClosure^));
     (* FIXME... provide closure data *)
     sb.Append(', in, in);');