PageRenderTime 119ms CodeModel.GetById 54ms app.highlight 1ms RepoModel.GetById 63ms app.codeStats 0ms

/test/core/tokens.lisp

http://github.com/skypher/cl-oauth
Lisp | 13 lines | 7 code | 6 blank | 0 comment | 0 complexity | 483b4a1270f2fde6d5521b7c0b41ee6c MD5 | raw file
 1
 2(in-package :oauth-test)
 3
 4(def-suite tokens :in oauth)
 5
 6(in-suite tokens)
 7
 8(test request-token.not-authorized-by-default
 9  (is (not (request-token-authorized-p (make-request-token)))))
10
11(test token-printer.deals-with-unbound-slots
12  (finishes (write-to-string (make-request-token))))
13