summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2020-12-27 21:54:01 +0000
committerflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2020-12-27 21:54:01 +0000
commit88db85ef21b0574a962b4e5c134b2fc51c2d8b8b (patch)
tree2625d0356c74fba865f74aaa3865b0f28dccaa51
parentc7471eebc5f129fd6db21baa23c00cd29b1e2d70 (diff)
downloadfpc-88db85ef21b0574a962b4e5c134b2fc51c2d8b8b.tar.gz
+ $codealign directive accepts setting maxcrecord
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@47862 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r--compiler/dirparse.pas2
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/dirparse.pas b/compiler/dirparse.pas
index 46d99f6564..8e619b30d0 100644
--- a/compiler/dirparse.pas
+++ b/compiler/dirparse.pas
@@ -99,6 +99,8 @@ implementation
end
else if tok='RECORDMAX' then
b.recordalignmax:=l
+ else if tok='MAXCRECORD' then
+ b.maxCrecordalign:=l
else { Error }
UpdateAlignmentStr:=false;
until false;