Sfoglia il codice sorgente

* enable {$push}/{$pop} in all syntax modes instead of ony in macpas
(mantis #10351)

git-svn-id: trunk@9723 -

Jonas Maebe 17 anni fa
parent
commit
70d94fecc1
1 ha cambiato i file con 2 aggiunte e 2 eliminazioni
  1. 2 2
      compiler/scandir.pas

+ 2 - 2
compiler/scandir.pas

@@ -1346,9 +1346,9 @@ implementation
         AddDirective('PACKRECORDS',directive_all, @dir_packrecords);
         AddDirective('PACKRECORDS',directive_all, @dir_packrecords);
         AddDirective('PACKSET',directive_all, @dir_packset);
         AddDirective('PACKSET',directive_all, @dir_packset);
         AddDirective('PIC',directive_all, @dir_pic);
         AddDirective('PIC',directive_all, @dir_pic);
-        AddDirective('POP',directive_mac, @dir_pop);
+        AddDirective('POP',directive_all, @dir_pop);
         AddDirective('PROFILE',directive_all, @dir_profile);
         AddDirective('PROFILE',directive_all, @dir_profile);
-        AddDirective('PUSH',directive_mac, @dir_push);
+        AddDirective('PUSH',directive_all, @dir_push);
         AddDirective('R',directive_all, @dir_resource);
         AddDirective('R',directive_all, @dir_resource);
         AddDirective('RANGECHECKS',directive_all, @dir_rangechecks);
         AddDirective('RANGECHECKS',directive_all, @dir_rangechecks);
         AddDirective('REFERENCEINFO',directive_all, @dir_referenceinfo);
         AddDirective('REFERENCEINFO',directive_all, @dir_referenceinfo);