From d4d919f2dcfeec6f79cea4d705f82f3ddecaecf5 Mon Sep 17 00:00:00 2001 From: "Andres G. Aragoneses" Date: Wed, 4 Sep 2024 14:18:18 +0800 Subject: [PATCH] Fixup --- fsxc/Fsxc.fs | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/fsxc/Fsxc.fs b/fsxc/Fsxc.fs index 50e9f63..29ada52 100644 --- a/fsxc/Fsxc.fs +++ b/fsxc/Fsxc.fs @@ -338,8 +338,12 @@ module Program = DeliverLinesUntilNextPreProcessorConditional -> LineKind.Commented, IgnoreLinesUntilNextPreProcessorConditional - | PreProcessorConditional.EndIf, _ -> + | PreProcessorConditional.EndIf, IgnoreLinesUntilNextPreProcessorConditional -> LineKind.Commented, NormalOperation + | PreProcessorConditional.EndIf, DeliverLinesUntilNextPreProcessorConditional -> + LineKind.Commented, NormalOperation + | PreProcessorConditional.EndIf, NormalOperation -> + LineKind.Normal, NormalOperation | PreProcessorConditional.If, _ -> if not(line.Contains "LEGACY_FRAMEWORK") then match currentReadState with