add type hint to avoid reflection
This commit is contained in:
parent
f6c9cf94d1
commit
db3e5d4a58
|
@ -100,9 +100,9 @@
|
||||||
that set of lines will be appended to and returned. If initial-output is specified,
|
that set of lines will be appended to and returned. If initial-output is specified,
|
||||||
that collection should have the same size as the flf font height."
|
that collection should have the same size as the flf font height."
|
||||||
[flf ^Character c & [initial-output]]
|
[flf ^Character c & [initial-output]]
|
||||||
(let [output-lines (or initial-output (get-initial-output-lines flf))
|
(let [output-lines (or initial-output (get-initial-output-lines flf))
|
||||||
char-lines (get-in flf [:chars c])
|
char-lines (get-in flf [:chars c])
|
||||||
hardblank (get-in flf [:header :hardblank-str])]
|
^String hardblank (get-in flf [:header :hardblank-str])]
|
||||||
(if char-lines
|
(if char-lines
|
||||||
(map
|
(map
|
||||||
(fn [^String char-line ^String output-line]
|
(fn [^String char-line ^String output-line]
|
||||||
|
|
Loading…
Reference in a new issue