X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/b0f206a2e8deb4c168d7dc989f4516741ae49a8c..b8f877703a0d50b46254fcfee3c815ae5e386013:/test/clang-tests.el diff --git a/test/clang-tests.el b/test/clang-tests.el index f2d55cc42..2b8b10550 100644 --- a/test/clang-tests.el +++ b/test/clang-tests.el @@ -22,15 +22,6 @@ (require 'company-tests) (require 'company-clang) -(ert-deftest company-clang-objc-templatify () - (with-temp-buffer - (let ((text "createBookWithTitle:andAuthor:")) - (insert text) - (company-clang-objc-templatify text) - (should (equal "createBookWithTitle:arg0 andAuthor:arg1" (buffer-string))) - (should (looking-at "arg0")) - (should (null (overlay-get (company-template-field-at) 'display)))))) - (ert-deftest company-clang-simple-annotation () (let ((str (propertize "foo" 'meta @@ -48,3 +39,7 @@ (ert-deftest company-clang-func-ptr-annotation () (let ((str (propertize "foo" 'meta "void (*)(int) foo"))) (should (equal (company-clang 'annotation str) "(*)(int)")))) + +(ert-deftest company-clang-null-annotation () + (let ((str "char")) + (should (null (company-clang 'annotation str)))))