Browse Source

* expect : after function when it is a forwarddef

peter 21 years ago
parent
commit
5e2a95d4fe
1 changed files with 5 additions and 2 deletions
  1. 5 2
      compiler/pdecsub.pas

+ 5 - 2
compiler/pdecsub.pas

@@ -824,7 +824,7 @@ implementation
                        begin
                        begin
                           if (
                           if (
                               not(is_interface(pd._class)) and
                               not(is_interface(pd._class)) and
-                              not(pd.forwarddef)
+                              pd.forwarddef
                              ) or
                              ) or
                              (m_repeat_forward in aktmodeswitches) then
                              (m_repeat_forward in aktmodeswitches) then
                           begin
                           begin
@@ -2238,7 +2238,10 @@ const
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.178  2004-05-12 13:21:09  karoly
+  Revision 1.179  2004-05-23 19:06:26  peter
+    * expect : after function when it is a forwarddef
+
+  Revision 1.178  2004/05/12 13:21:09  karoly
     * few small changes to add syscall support to M68k/Amiga target
     * few small changes to add syscall support to M68k/Amiga target
 
 
   Revision 1.177  2004/05/11 22:52:48  olle
   Revision 1.177  2004/05/11 22:52:48  olle