Fix issue with constant swizzles

Fixes: #29
krauthaufen · Oct 17, 2022 · 3b7edb3 · 3b7edb3
1 parent cbac704
commit 3b7edb3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Libs/FShade.Core/Shader.fs b/src/Libs/FShade.Core/Shader.fs
@@ -946,7 +946,7 @@ module Preprocessor =
         | _ -> None
 
     let private zeroOneVecProperty =
-        System.Text.RegularExpressions.Regex @"([XYZW]*[ONIP])+"
+        System.Text.RegularExpressions.Regex @"^([XYZW]*[OINP]+[XYZW]*)+$"
 
     let rec preprocessNormalS (e : Expr) : Preprocess<Expr> =
         state {