@@ -45,6 +45,7 @@ swaggerFieldRules = defaultFieldRules & lensField %~ swaggerFieldNamer
45 fixName' "minimum" = "minimum_" -- Prelude conflict
45 fixName' "minimum" = "minimum_" -- Prelude conflict
46 fixName' "maximum" = "maximum_" -- Prelude conflict
46 fixName' "maximum" = "maximum_" -- Prelude conflict
47 fixName' "enum" = "enum_" -- Control.Lens conflict
47 fixName' "enum" = "enum_" -- Control.Lens conflict
48+ fixName' "head" = "head_" -- Prelude conflict
48 fixName' n = n
49 fixName' n = n
50gunfoldEnum :: String -> [a] -> (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c a
51gunfoldEnum :: String -> [a] -> (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c a