Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 1 Debugger entered--Lisp error: (wrong-type-argument stringp nil)
- 2 string-match("fn" nil)
- 3 (if (string-match "fn" type) "f" "v")
- 4 (popup-make-item name :symbol (if (string-match "fn" type) "f" "v") :summary (truncate-string-to-width type tern-ac-completion-truncate-length 0 nil "...") :document (concat type "\n\n" doc))
- 5 (let ((doc (cdr (assq (quote doc) item))) (type (cdr (assq (quote type) item))) (name (cdr (assq (quote name) item)))) (popup-make-item name :symbol (if (string-match "fn" type) "f" "v") :summary (truncate-string-to-width type tern-ac-completion-truncate-length 0 nil "...") :document (concat type "\n\n" doc)))
- 6 (closure (t) (item) (let ((doc (cdr (assq (quote doc) item))) (type (cdr (assq (quote type) item))) (name (cdr (assq (quote name) item)))) (popup-make-item name :symbol (if (string-match "fn" type) "f" "v") :summary (truncate-string-to-width type tern-ac-completion-truncate-length 0 nil "...") :document (concat type "\n\n" doc))))(((name . "beginPath")))
- 7 mapcar((closure (t) (item) (let ((doc (cdr (assq (quote doc) item))) (type (cdr (assq (quote type) item))) (name (cdr (assq (quote name) item)))) (popup-make-item name :symbol (if (string-match "fn" type) "f" "v") :summary (truncate-string-to-width type tern-ac-completion-truncate-length 0 nil "...") :document (concat type "\n\n" doc)))) (((name . "beginPa$
- 8 tern-ac-completion-matches()
- 9 funcall(tern-ac-completion-matches)
- 10 (cond ((functionp function) (funcall function)) (t (eval function)))
- 11 (save-excursion (cond ((functionp function) (funcall function)) (t (eval function))))
- 12 (setq candidates (save-excursion (cond ((functionp function) (funcall function)) (t (eval function)))))
- 13 (if cache nil (setq candidates (save-excursion (cond ((functionp function) (funcall function)) (t (eval function))))) (setq candidates (mapcar (function (lambda (candidate) (if (consp candidate) (propertize (car candidate) (quote value) (cdr candidate)) candidate))) candidates)) (if do-cache (progn (setq ac-candidates-cache (cons (cons source candidates) a$
- 14 (let* ((do-cache (assq (quote cache) source)) (function (assoc-default (quote candidates) source)) (action (assoc-default (quote action) source)) (document (assoc-default (quote document) source)) (symbol (assoc-default (quote symbol) source)) (ac-limit (or (assoc-default (quote limit) source) ac-limit)) (face (or (assoc-default (quote face) source) (assoc$
- 15 ac-candidates-1(((candidates . tern-ac-completion-matches) (prefix . tern-ac-completion-prefix) (requires . -1)))
- 16 (append candidates (ac-candidates-1 source))
- 17 (setq candidates (append candidates (ac-candidates-1 source)))
- 18 (while (consp --cl-var--) (setq source (car --cl-var--)) (setq candidates (append candidates (ac-candidates-1 source))) (setq --cl-var-- (cdr --cl-var--)))
- 19 (let* ((completion-ignore-case (or (eq ac-ignore-case t) (and (eq ac-ignore-case (quote smart)) (let ((case-fold-search nil)) (not (string-match "[[:upper:]]" ac-prefix)))))) (case-fold-search completion-ignore-case) (prefix-len (length ac-prefix)) (--cl-var-- ac-current-sources) (source nil) (candidates nil)) (while (consp --cl-var--) (setq source (car --$
- 20 ac-candidates()
- 21 (setq ac-candidates (ac-candidates))
- 22 (progn (ac-put-prefix-overlay) (setq ac-candidates (ac-candidates)) (let ((preferred-width (popup-preferred-width ac-candidates))) (if (or (null ac-menu) (>= (progn (or (and ...) (error "%s accessing a non-%s" ... ...)) (aref ac-menu 4)) preferred-width) (<= (progn (or (and ...) (error "%s accessing a non-%s" ... ...)) (aref ac-menu 4)) (- preferred-width $
- 23 (if (and auto-complete-mode ac-prefix (or ac-triggered force) (not isearch-mode)) (progn (ac-put-prefix-overlay) (setq ac-candidates (ac-candidates)) (let ((preferred-width (popup-preferred-width ac-candidates))) (if (or (null ac-menu) (>= (progn (or ... ...) (aref ac-menu 4)) preferred-width) (<= (progn (or ... ...) (aref ac-menu 4)) (- preferred-width 10$
- 24 ac-update(nil)
- 25 (setq result (ac-update force))
- 26 (and (setq result (ac-update force)) (null ac-candidates))
- 27 (if (and (setq result (ac-update force)) (null ac-candidates)) (progn (add-to-list (quote ac-ignoring-prefix-def) ac-current-prefix-def) (ac-start :force-init t) ac-current-prefix-def))
- 28 (while (if (and (setq result (ac-update force)) (null ac-candidates)) (progn (add-to-list (quote ac-ignoring-prefix-def) ac-current-prefix-def) (ac-start :force-init t) ac-current-prefix-def)))
- 29 (let (result) (while (if (and (setq result (ac-update force)) (null ac-candidates)) (progn (add-to-list (quote ac-ignoring-prefix-def) ac-current-prefix-def) (ac-start :force-init t) ac-current-prefix-def))) result)
- 30 ac-update-greedy()
- 31 apply(ac-update-greedy nil)
- 32 timer-event-handler([t 0 0 100000 0.1 ac-update-greedy nil idle 0])
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement