summaryrefslogtreecommitdiff
path: root/compiler/pexpr.pas
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/pexpr.pas')
-rw-r--r--compiler/pexpr.pas3
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/pexpr.pas b/compiler/pexpr.pas
index 97f5cf381a..b22341a627 100644
--- a/compiler/pexpr.pas
+++ b/compiler/pexpr.pas
@@ -1311,7 +1311,8 @@ implementation
if (htype.def=cvarianttype.def) and
not(cs_compilesystem in aktmoduleswitches) then
current_module.flags:=current_module.flags or uf_uses_variants;
- if try_to_consume(_LKLAMMER) then
+ if (block_type<>bt_type) and
+ try_to_consume(_LKLAMMER) then
begin
p1:=comp_expr(true);
consume(_RKLAMMER);