From f64d66fa48d08165edc0b7ebd80ea0d8ee081171 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Fri, 9 May 2003 19:00:30 +0000
Subject: [PATCH]   * call inherited after_header as well

---
 compiler/powerpc/cpupi.pas | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/compiler/powerpc/cpupi.pas b/compiler/powerpc/cpupi.pas
index ae0f06c32a..0245b74e3c 100644
--- a/compiler/powerpc/cpupi.pas
+++ b/compiler/powerpc/cpupi.pas
@@ -68,6 +68,7 @@ unit cpupi;
          { this value is necessary for nested procedures }
          if assigned(procdef.localst) then
            procdef.localst.address_fixup:=align(procdef.parast.address_fixup+procdef.parast.datasize,16);
+         inherited after_header;
      end;
 
     procedure tppcprocinfo.after_pass1;
@@ -113,7 +114,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.12  2003-04-27 11:21:36  peter
+  Revision 1.13  2003-05-09 19:00:30  jonas
+    * call inherited after_header as well
+
+  Revision 1.12  2003/04/27 11:21:36  peter
     * aktprocdef renamed to current_procdef
     * procinfo renamed to current_procinfo
     * procinfo will now be stored in current_module so it can be