diff --git a/Source/SimpleParser/SimpleParser.pas b/Source/SimpleParser/SimpleParser.pas index d7efd2c..8600bcc 100644 --- a/Source/SimpleParser/SimpleParser.pas +++ b/Source/SimpleParser/SimpleParser.pas @@ -4381,7 +4381,10 @@ procedure TmwSimplePasPar.RecordAlign; if ExID = ptAlign then begin NextToken; - RecordAlignValue; + if TokenID = ptRoundOpen then + ConstantExpression + else + RecordAlignValue; end; end;