Advertisement
Guest User

Untitled

a guest
Dec 21st, 2014
159
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.41 KB | None | 0 0
  1. (ns node-cljs-pos.core
  2. (:require [cljs.nodejs :as node]))
  3.  
  4. (node/enable-util-print!)
  5.  
  6. (def pos (node/require "pos"))
  7.  
  8. (defn pos-lexer [s]
  9. (let [Lexer (.-Lexer pos)
  10. lexer (Lexer.)]
  11. (. lexer lex s)))
  12.  
  13. (defn pos-tagger [words]
  14. (let [Tagger (.-Tagger pos)
  15. tagger (Tagger.)]
  16. (. tagger tag words)))
  17.  
  18. (defn -main [input]
  19. (println (-> input pos-lexer pos-tagger)))
  20.  
  21. (set! *main-cli-fn* -main)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement