1. (defun jde-javadoc-lookup-bovine-table ()
2. "Search the bovine table for the token at the current line."
3. (save-excursion
4. ;; Moves the point to the first non-blank character found on the
5. ;; current line. Blank lines are skipped.
6. (beginning-of-line)
7. (while (looking-at "[ \n\r\t]")
8. (forward-char))
9. (let* ((p (point))
10. (tokens (semantic-bovinate-toplevel nil nil t))
11. (classes (semantic-find-nonterminal-by-token 'type tokens)))
12. (catch 'found (jde-javadoc-lookup-classes classes p nil)))))
This function, in jde-javadoc.el, was returning an error. I changed line
10. to read:
(tokens (semantic-bovinate-toplevel t))
And now it seems to work.
I notice that in semantic.el, there is this:
(defun semantic-bovinate-toplevel (&optional checkcache)
The version of semantic.el is:
;; X-RCS: $Id: semantic.el,v 1.62 2000/11/18 14:09:50 zappo Exp $
and the version of jde-javadoc.el is:
;; VC: $Id: jde-javadoc.el,v 1.11 2000/10/08 12:55:39 paulk Exp $
I am on Windows, using NT/Emacs.
It looks to me like the function description expects one optional parameter, and complains when it gets three.
Dan Langlois
