Helmut Eller e9626484@stud3.tuwien.ac.at writes:
Bill_Clementson@peoplesoft.com writes:
Unfortunately, it does not work in 6.x - it just positions to the top
of
the file that the method is in.
May I ask what the attached snippet returns for you? I tried it with Franz' telnet prompt at prompt.franz.com (a 6.2) and it seems ok. ACL5 returns:
((BAR #((:FILE "/tmp/foo.lisp") (:POSITION 22))) ((METHOD FOO ((EQL :A))) #((:FILE "/tmp/foo.lisp") (:POSITION 38))) ((METHOD FOO ((EQL :B))) #((:FILE "/tmp/foo.lisp") (:POSITION 71))) (FOO #((:FILE "/tmp/foo.lisp") (:FUNCTION-NAME "FOO"))))
ACL 6.2 returns:
((BAR #((:FILE "c:\tmp\foo.lisp") (:POSITION 23))) ((METHOD FOO ((EQL :A))) #((:FILE "c:\tmp\foo.lisp") (:POSITION 40))) ((METHOD FOO ((EQL :B))) #((:FILE "c:\tmp\foo.lisp") (:POSITION 74))) (FOO #((:FILE "c:\tmp\foo.lisp") (:FUNCTION-NAME "FOO"))))
-- Bill Clementson