510 => 501

metosin · May 1, 2024 · 313badd · 313badd
1 parent 10a1976
commit 313badd
Showing 1 changed file with 10 additions and 5 deletions.
diff --git a/src/ring/openapi/openapi3_schema.clj b/src/ring/openapi/openapi3_schema.clj
@@ -77,12 +77,17 @@
    (opt :description) s/Str
    (opt :server) Server})
 
+(def ^:private codes [100 101 102 103
+                      200 201 202 203 204 205 206 207 208 226
+                      300 301 302 303 304 305 306 307 308
+                      400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 428 429 431 451
+                      500 501 502 503 504 505 506 507 508 510 511])
+
+(assert (apply distinct? codes))
+(assert (apply < codes))
+
 (s/defschema ResponseCode
-  (s/enum "100" "101" "102" "103" "200" "201" "202" "203" "204" "205" "206" "207" "208" "226"
-          "300" "301" "302" "303" "304" "305" "306" "307" "308"
-          "400" "401" "402" "403" "404" "405" "406" "407" "408" "409" "410" "411" "412" "413" "414" "415"
-          "416" "417" "418" "419" "420" "421" "422" "423" "424" "425" "426" "428" "429" "431" "451"
-          "500" "510" "502" "503" "504" "505" "506" "507" "508" "510" "511"))
+  (apply s/enum (map str codes)))
 
 (s/defschema Response
   {:description s/Str