Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (ns node-cljs-pos.core
- (:require [cljs.nodejs :as node]))
- (node/enable-util-print!)
- (def pos (node/require "pos"))
- (defn pos-lexer [s]
- (let [Lexer (.-Lexer pos)
- lexer (Lexer.)]
- (. lexer lex s)))
- (defn pos-tagger [words]
- (let [Tagger (.-Tagger pos)
- tagger (Tagger.)]
- (. tagger tag words)))
- (defn -main [input]
- (println (-> input pos-lexer pos-tagger)))
- (set! *main-cli-fn* -main)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement