diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-09-15 14:54:09 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-09-15 14:55:18 -0400 |
| commit | 8013cfa27c143e2a9abe6fe6f24e00d92396886d (patch) | |
| tree | 90e44267c44acef8c332cdd4a83e64ead5256983 /src | |
| parent | 1450c56754c1b2a1b42fc78547f384b83aa8dc13 (diff) | |
Compare atoms to @ instead of β so that NaN formats as a number
Diffstat (limited to 'src')
| -rw-r--r-- | src/fmt.bqn | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fmt.bqn b/src/fmt.bqn index 3db01657..f1171c1e 100644 --- a/src/fmt.bqn +++ b/src/fmt.bqn @@ -1,7 +1,7 @@ # Format an array to a string including newlines { F0βπ½ # Function to format a scalar - FmtAtom β (β β€βββΆβ¨@βΈβ βΆβ¨"@","'"βΈ(βΎβΎβ£)β©,F0β©) + FmtAtom β (β <β@βΆβ¨@βΈβ βΆβ¨"@","'"βΈ(βΎβΎβ£)β©,F0β©) # Vertical padding for arrays of rank greater than 2 PadV β { @@ -52,7 +52,7 @@ (=π©) Enframe 2 Pad π¨ PaddingJoin FmtΒ¨π© } - FmtSimple β (β (0βΈ<+β€)+Β΄)β(β₯β€βΛ)βΆ{ # Depth 1 + FmtSimple β (β (0βΈ<+β€)+Β΄)β(β₯<@Λ)βΆ{ # Depth 1 # All characters k β ββ(0βΈ=) -β c β Β―1ββ’π© q β '"' |