Advertisement
nanounanue

Error with map-merge

Aug 20th, 2021
149
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.51 KB | None | 0 0
  1. Debugger entered--Lisp error: (cl-no-applicable-method map-into #<hash-table equal 1/65 0x144add1> list)
  2. signal(cl-no-applicable-method (map-into #<hash-table equal 1/65 0x144add1> list))
  3. cl-no-applicable-method(#s(cl--generic :name map-into :dispatches ((1 #s(cl--generic-generalizer :name cl--generic-eql-generalizer :priority 100 :tagcode-function #f(compiled-function (name &rest _) #<bytecode -0x1094e993bd01689b>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x13dc62babc648d59>)) #s(cl--generic-generalizer :name cl--generic-head-generalizer :priority 80 :tagcode-function #f(compiled-function (name &rest _) #<bytecode 0x1ea6f9647f815825>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x13fe40531262bd99>)) #s(cl--generic-generalizer :name cl--generic-t-generalizer :priority 0 :tagcode-function #f(compiled-function (name &rest _) #<bytecode -0x12a5989a124586b3>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x13d7fdcbedba6a4d>))) (0 #s(cl--generic-generalizer :name cl--generic-t-generalizer :priority 0 :tagcode-function #f(compiled-function (name &rest _) #<bytecode -0x12a5989a124586b3>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x13d7fdcbedba6a4d>)))) :method-table (#s(cl--generic-method :specializers (t (head hash-table)) :qualifiers nil :uses-cnm nil :function #f(compiled-function (map type) "Convert MAP into a hash-table.\nTYPE is a list whose car is `hash-table' and cdr a list of\nkeyword-args forwarded to `make-hash-table'.\n\nExample:\n (map-into '((1 . 3)) '(hash-table :test eql))" #<bytecode -0x171535c5e9691df0>)) #s(cl--generic-method :specializers (t (eql 'hash-table)) :qualifiers nil :uses-cnm nil :function #f(compiled-function (map type) "Convert MAP into a hash-table with keys compared with `equal'." #<bytecode -0x1e73456b71fcf9bb>)) #s(cl--generic-method :specializers (t (eql 'plist)) :qualifiers nil :uses-cnm nil :function #f(compiled-function (map type) "Convert MAP into a plist." #<bytecode 0x99391782a65b37c>)) #s(cl--generic-method :specializers (t (eql 'alist)) :qualifiers nil :uses-cnm nil :function #f(compiled-function (map type) "Convert MAP into an alist." #<bytecode 0x19eef939ed5ab016>)) #s(cl--generic-method :specializers (t (eql 'list)) :qualifiers nil :uses-cnm nil :function #f(compiled-function (map type) "Convert MAP into an alist." #<bytecode 0x19eef939ed5ab016>))) :options nil) #<hash-table equal 1/65 0x144add1> list)
  4. apply(cl-no-applicable-method #s(cl--generic :name map-into :dispatches ((1 #s(cl--generic-generalizer :name cl--generic-eql-generalizer :priority 100 :tagcode-function #f(compiled-function (name &rest _) #<bytecode -0x1094e993bd01689b>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x13dc62babc648d59>)) #s(cl--generic-generalizer :name cl--generic-head-generalizer :priority 80 :tagcode-function #f(compiled-function (name &rest _) #<bytecode 0x1ea6f9647f815825>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x13fe40531262bd99>)) #s(cl--generic-generalizer :name cl--generic-t-generalizer :priority 0 :tagcode-function #f(compiled-function (name &rest _) #<bytecode -0x12a5989a124586b3>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x13d7fdcbedba6a4d>))) (0 #s(cl--generic-generalizer :name cl--generic-t-generalizer :priority 0 :tagcode-function #f(compiled-function (name &rest _) #<bytecode -0x12a5989a124586b3>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x13d7fdcbedba6a4d>)))) :method-table (#s(cl--generic-method :specializers (t (head hash-table)) :qualifiers nil :uses-cnm nil :function #f(compiled-function (map type) "Convert MAP into a hash-table.\nTYPE is a list whose car is `hash-table' and cdr a list of\nkeyword-args forwarded to `make-hash-table'.\n\nExample:\n (map-into '((1 . 3)) '(hash-table :test eql))" #<bytecode -0x171535c5e9691df0>)) #s(cl--generic-method :specializers (t (eql 'hash-table)) :qualifiers nil :uses-cnm nil :function #f(compiled-function (map type) "Convert MAP into a hash-table with keys compared with `equal'." #<bytecode -0x1e73456b71fcf9bb>)) #s(cl--generic-method :specializers (t (eql 'plist)) :qualifiers nil :uses-cnm nil :function #f(compiled-function (map type) "Convert MAP into a plist." #<bytecode 0x99391782a65b37c>)) #s(cl--generic-method :specializers (t (eql 'alist)) :qualifiers nil :uses-cnm nil :function #f(compiled-function (map type) "Convert MAP into an alist." #<bytecode 0x19eef939ed5ab016>)) #s(cl--generic-method :specializers (t (eql 'list)) :qualifiers nil :uses-cnm nil :function #f(compiled-function (map type) "Convert MAP into an alist." #<bytecode 0x19eef939ed5ab016>))) :options nil) (#<hash-table equal 1/65 0x144add1> list))
  5. #f(compiled-function (&rest args) #<bytecode 0x1741a39ba4ebb790>)(#<hash-table equal 1/65 0x144add1> list)
  6. apply(#f(compiled-function (&rest args) #<bytecode 0x1741a39ba4ebb790>) #<hash-table equal 1/65 0x144add1> list nil)
  7. map-into(#<hash-table equal 1/65 0x144add1> list)
  8. map--merge(#f(compiled-function (result key value) #<bytecode 0x7495b5cd5a97fda>) list ((a . 1)) ((a . 2)))
  9. apply(map--merge #f(compiled-function (result key value) #<bytecode 0x7495b5cd5a97fda>) list (((a . 1)) ((a . 2))))
  10. map-merge(list ((a . 1)) ((a . 2)))
  11. eval((map-merge 'list '((a . 1)) '((a . 2))) nil)
  12. elisp--eval-last-sexp(nil)
  13. eval-last-sexp(nil)
  14. eros-eval-last-sexp(nil)
  15. funcall-interactively(eros-eval-last-sexp nil)
  16. call-interactively(eros-eval-last-sexp nil nil)
  17. command-execute(eros-eval-last-sexp)
  18.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement