Explorar o código

Tiny bugix in the IntermediateBackend. compiling with --cellsAreObjects works now

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6727 8c9fc860-2736-0410-a75d-ab315db34111
skoster %!s(int64=9) %!d(string=hai) anos
pai
achega
8970d4bd88
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      source/FoxIntermediateBackend.Mod

+ 1 - 1
source/FoxIntermediateBackend.Mod

@@ -6926,7 +6926,7 @@ TYPE
 			procedure.SetAccess(SyntaxTree.Hidden);
 			currentScope := procedureScope;
 			section := NewSection(module.allSections, Sections.CodeSection, name, NIL,commentPrintout # NIL);
-			EmitEnter(section, -1,NIL,0,0,0);
+			EmitEnter(section, -1,procedure,0,0,0);
 			RETURN section;
 		END OpenInitializer;