Verified Commit 02b66e2f authored by Camil Staps's avatar Camil Staps 🚀

Clean.Types: add pretty-printing for packed arrays

parent 45157274
......@@ -142,9 +142,10 @@ typeConstructorName isInfix isArg t as
| t == "_#List!" = if isInfix ("[#" -- as -- "!]") ("[#!]" -- as`)
| t == "_|List" = if isInfix ("[|" -- as -- "]") ("[|]" -- as`)
// Arrays
| t == "_#Array" = if isInfix ("{#" -- as -- "}") ("{#}" -- as`)
| t == "_Array" = if isInfix ("{" -- as -- "}") ("{}" -- as`)
| t == "_!Array" = if isInfix ("{!" -- as -- "}") ("{!}" -- as`)
| t == "_#Array" = if isInfix ("{#" -- as -- "}") ("{#}" -- as`)
| t == "_32#Array" = if isInfix ("{32#" -- as -- "}") ("{32#}" -- as`)
| t == "_Array" = if isInfix ("{" -- as -- "}") ("{}" -- as`)
| t == "_!Array" = if isInfix ("{!" -- as -- "}") ("{!}" -- as`)
// Tuples
| t % (0,5) == "_Tuple"
# n = toInt (t % (6, size t - 1))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment