Skip to content

Instantly share code, notes, and snippets.

@sjl
Created August 4, 2012 19:12
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save sjl/3259412 to your computer and use it in GitHub Desktop.
Save sjl/3259412 to your computer and use it in GitHub Desktop.
([^Screen screen x y ^String s {:as opts
:keys [fg bg styles]
:or {fg :default
bg :default
styles #{}}}]
(let [styles ^clojure.lang.PersistentHashSet (set (map c/styles styles))
x (int x)
y (int y)
fg ^com.googlecode.lanterna.terminal.Terminal$Color (c/colors fg)
bg ^com.googlecode.lanterna.terminal.Terminal$Color (c/colors bg)]
(.putString screen x y s fg bg styles))))
public void putString(int x, int y, String string, Terminal.Color foregroundColor,
Terminal.Color backgroundColor, ScreenCharacterStyle... styles)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment