Skip to content

Commit 08f1ead

Browse files
committed
kp_t805_037.lkql: Reformat the file
1 parent ff9651e commit 08f1ead

File tree

1 file changed

+14
-11
lines changed

1 file changed

+14
-11
lines changed

lkql_checker/share/lkql/kp/kp_t805_037.lkql

Lines changed: 14 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -5,16 +5,19 @@
55
@check(message="possible occurrence of KP T805-037")
66
fun kp_t805_037(node) =
77
node is TypeDecl(
8-
f_discriminants: part@KnownDiscriminantPart,
9-
f_type_def: r@RecordTypeDef(f_record_def: def@RecordDef)
8+
f_discriminants: part@KnownDiscriminantPart,
9+
f_type_def: r@RecordTypeDef(f_record_def: def@RecordDef)
1010
) when {
11-
val discs = from part select DefiningName;
12-
[decl for decl in
13-
from def.f_components select c@ComponentDecl
14-
when c.f_component_def.f_type_expr is
15-
s@SubtypeIndication(f_constraint: CompositeConstraint(
16-
p_is_discriminant_constraint(): true)
17-
and [id for id in (from c.f_default_expr select Identifier)
18-
if [d for d in discs if d.p_name_matches(id)]]]
11+
val discs = from part select DefiningName;
12+
[
13+
decl for decl in from def.f_components select c@ComponentDecl
14+
when c.f_component_def.f_type_expr is s@SubtypeIndication(
15+
f_constraint: CompositeConstraint(
16+
p_is_discriminant_constraint(): true
17+
)
18+
and [
19+
id for id in (from c.f_default_expr select Identifier)
20+
if [d for d in discs if d.p_name_matches(id)]
21+
]
22+
]
1923
}
20-

0 commit comments

Comments
 (0)