add function metadata

quil · Jun 16, 2012 · 516d0dd · 516d0dd
1 parent b750a95
commit 516d0dd
Showing 1 changed file with 15 additions and 3 deletions.
diff --git a/src/quil/core.clj b/src/quil/core.clj
@@ -4375,8 4375,15 @@
  [app-name & opts]
  `(defapplet ~app-name ~@opts))
 
-(defn key-coded?
- "Returns true if char c is a 'coded' char i.e. it is necessary to fetch the key-code as an integer and use that to determine the specific key pressed. See key-keyword."
 (defn ^{:requires-bindings false
  :processing-name nil
  :category "Input"
  :subcategory "Keyboard"
  :added "1.6"}
  key-coded?
  "Returns true if char c is a 'coded' char i.e. it is necessary to
  fetch the key-code as an integer and use that to determine the
  specific key pressed. See key-keyword."
  [c]
  (= PConstants/CODED (int c)))
 
@@ -4415,7 4422,12 @@
  KeyEvent/VK_F23 :f23
  KeyEvent/VK_F24 :f24})
 
-(defn key-as-keyword
 (defn ^{:requires-bindings true
  :processing-name nil
  :category "Input"
  :subcategory "Keyboard"
  :added "1.6"}
  key-as-keyword
  "Returns a keyword representing the currently pressed key. Modifier
  keys are represented as: :up, :down, :left, :right, :alt, :control,
  :shift, :command, :f1-24"