浏览代码

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

git-svn-id: trunk@9723 -

Jonas Maebe 17 年之前
父节点
当前提交
70d94fecc1
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      compiler/scandir.pas

+ 2 - 2
compiler/scandir.pas

@@ -1346,9 +1346,9 @@ implementation
         AddDirective('PACKRECORDS',directive_all, @dir_packrecords);
         AddDirective('PACKSET',directive_all, @dir_packset);
         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('PUSH',directive_mac, @dir_push);
+        AddDirective('PUSH',directive_all, @dir_push);
         AddDirective('R',directive_all, @dir_resource);
         AddDirective('RANGECHECKS',directive_all, @dir_rangechecks);
         AddDirective('REFERENCEINFO',directive_all, @dir_referenceinfo);