mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-07 15:46:55 +01:00
47000475e3
Fixes two points from JesperSchulz's review on PR #136. 1. boolean-operators-do-not-short-circuit.md gave one fix — nested if — for and, or, and xor alike. That's only correct for and: nesting if A then if B then Action drops the A-true/B-false case of A or B, silently changing the result. Gives or its own early-exit pattern (if A then exit(true); exit(B)), warns explicitly against applying the and-rewrite to or, and clarifies that xor is not a short-circuit candidate in any language since its result always depends on both operands. Adds an or fixture (IsEligibleForFreeShipping) to both samples so an agent has a concrete pattern to match instead of extrapolating from the and-only examples. 2. case-true-of-for-long-condition-chains.md derived stop-at-first-match for one comma-separated value set from the documentation's guarantee about the first matching value set — plural, i.e. ordering across value sets, which is not the same claim. The good sample's Item.Get / Blocked pair depended on the one the docs don't make. Restructures the sample to only comma-group the three pure, order-independent checks; Get and Blocked keep their own value sets, in order, relying solely on the guarantee that is actually documented. Description and Anti Pattern now state that boundary so it isn't re-collapsed later. Also carries forward a parenthesis fix (not Item.Blocked in the collapsed bad sample) that was made two commits ago but never landed. Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
29 lines
1.2 KiB
AL
29 lines
1.2 KiB
AL
codeunit 50543 "Perf Sample CaseChain Bad"
|
|
{
|
|
procedure IsShippableLine(SalesLine: Record "Sales Line"): Boolean
|
|
var
|
|
Item: Record Item;
|
|
begin
|
|
// Five levels of nesting to sequence five guards. The evaluation order is
|
|
// carried by indentation alone and the body drifts steadily right.
|
|
if SalesLine.Type = SalesLine.Type::Item then
|
|
if SalesLine."No." <> '' then
|
|
if SalesLine."Qty. to Ship" > 0 then
|
|
if Item.Get(SalesLine."No.") then
|
|
if not Item.Blocked then
|
|
exit(true);
|
|
exit(false);
|
|
end;
|
|
|
|
procedure IsShippableLineCollapsed(SalesLine: Record "Sales Line"): Boolean
|
|
var
|
|
Item: Record Item;
|
|
begin
|
|
// The wrong escape from the ladder: flattening it into 'and' trades the
|
|
// nesting for a defect, because every operand is still evaluated. Item
|
|
// fields are read even when the Get failed. The parentheses are not
|
|
// optional either — 'and' binds tighter than '=' and '<>' in AL.
|
|
exit((SalesLine.Type = SalesLine.Type::Item) and (SalesLine."No." <> '') and
|
|
(SalesLine."Qty. to Ship" > 0) and Item.Get(SalesLine."No.") and not Item.Blocked);
|
|
end;
|
|
}
|