compact strings

This commit is contained in:
dzaima 2022-08-18 09:50:45 +03:00
parent 34841dca65
commit cab354265b

5
cc.bqn
View File

@ -23,7 +23,10 @@ Esc←{
}
U32Len ( - ·+´ 55296 56319)-@ # for dzaima/BQN; shouldn't break things in proper BQN impls, as surrogate values don't map to valid codepoints
OStr {"m_c32vec","(U""",Esc𝕩,""",",•Repr U32Len 𝕩,")"} # A BQN string
OStr { # A BQN string
a´𝕩<128+@
a"m_c32vec""m_c8vec","(",a¬"U","""",Esc𝕩,""",",•Repr U32Len 𝕩,")"
}
OChr {"m_c32(U'"(Esc𝕩)"')"} # A BQN character
ONum {s"-"/˜𝕩<0 =|"m_f64("")"˜sF| "m_f64("s"1.0/0.0)"𝕩} # Format number
OAny @ONumOChr, OStr,