Re: [O] new exporter

[Achim Gratz]

Current testing results with the exporter files uncompiled:

2 unexpected results:
   FAILED  test-org-export/read-attribute
   FAILED  test-org-export/unravel-code

...and compiled:

6 unexpected results:
   FAILED  test-org-export/read-attribute
   FAILED  test-org-export/table-cell-alignment
   FAILED  test-org-export/table-cell-borders
   FAILED  test-org-export/table-row-ends-header-p
   FAILED  test-org-export/table-row-starts-header-p
   FAILED  test-org-export/unravel-code


You said you don't get those errors for the table exporter, which is
still puzzling me.

Tracebacks for the two new test errors:

--8<---------------cut here---------------start------------->8---
Test test-org-export/read-attribute backtrace:
  org-element-current-element()
  (prog1 (org-element-current-element) (kill-buffer))
  (progn (org-mode) (progn (insert "#+ATTR_HTML: :a 1 :b 2\nParagraph"
  (unwind-protect (progn (org-mode) (progn (insert "#+ATTR_HTML: :a 1 
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn
  (with-current-buffer temp-buffer (unwind-protect (progn (org-mode) (
  (let ((temp-buffer (generate-new-buffer " *temp*"))) (with-current-b
  (with-temp-buffer (org-mode) (progn (insert "#+ATTR_HTML: :a 1 :b 2\
  (org-test-with-temp-text "#+ATTR_HTML: :a 1 :b 2\nParagraph" (org-el
  (org-export-read-attribute :attr_html (org-test-with-temp-text "#+AT
  (list (org-export-read-attribute :attr_html (org-test-with-temp-text
  (let ((fn-4401 (function equal)) (args-4402 (list (org-export-read-a
  (should (equal (org-export-read-attribute :attr_html (org-test-with-
  (lambda nil (should (equal (org-export-read-attribute :attr_html (or
  byte-code("\306\307!▒q\210\310\216\311 \312\216\313\314\315\316\3
  ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
  byte-code("\306\307!\211▒r\310\311!q\210\312 d\313\223)L\210\314\216
  ert-run-test([cl-struct-ert-test test-org-export/read-attribute "Tes
  ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st
  ert-run-tests("\\(org\\|ob\\)" #[(event-type &rest event-args) \30
  ert-run-tests-batch("\\(org\\|ob\\)")
  ert-run-tests-batch-and-exit("\\(org\\|ob\\)")
  (let ((org-id-track-globally t) (org-id-locations-file (convert-stan
  org-test-run-batch-tests()
  call-interactively(org-test-run-batch-tests nil nil)
  command-execute(org-test-run-batch-tests)
  command-line-1(("--eval" "(add-to-list 'load-path \"./lisp\")" "--ev
  command-line()
  normal-top-level()
Test test-org-export/read-attribute condition:
    (wrong-number-of-arguments
     #[(limit &optional granularity special structure)
313=\203:address@hidden      \306\310!\203   b\210)\311\n\205(\n\312=?
address@hidden \211CD\322CPE\323 ,\203r\324@
address@hidden@address@hidden \203\252\333@
                                                                                
                         
\"\202\332\306\334!\203\317\212\335\336\337\340\327\330!!\"\307\311#)address@hidden@!\202\332\306H!\203\327\330!I\212\335\343\307\311#)address@hidden@address@hidden)address@hidden)\354
 address@hidden 
\210\357\327\330!\226J\"address@hidden@!)\202\332\306\361!\203a\354 
address@hidden address@hidden address@hidden 
address@hidden@address@hidden@address@hidden address@hidden \"address@hidden"
       [org-element--affiliated-re opoint granularity raw-secondary-p 
case-fold-search special looking-at nil "[        ]*$" t ...]
       7
       ("/home/gratz/lisp/org-mode/lisp/org-element.elc" . 82655)]
     0)
   FAILED  308/362  test-org-export/read-attribute
--8<---------------cut here---------------end--------------->8---

--8<---------------cut here---------------start------------->8---
Test test-org-export/unravel-code backtrace:
  org-element-current-element()
  (org-export-unravel-code (org-element-current-element))
  (list (org-export-unravel-code (org-element-current-element)) (quote
  (let ((fn-4727 (function equal)) (args-4728 (list (org-export-unrave
  (should (equal (org-export-unravel-code (org-element-current-element
  (prog1 (should (equal (org-export-unravel-code (org-element-current-
  (progn (org-mode) (progn (insert "#+BEGIN_EXAMPLE\n(+ 1 1)\n#+END_EX
  (unwind-protect (progn (org-mode) (progn (insert "#+BEGIN_EXAMPLE\n(
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn
  (with-current-buffer temp-buffer (unwind-protect (progn (org-mode) (
  (let ((temp-buffer (generate-new-buffer " *temp*"))) (with-current-b
  (with-temp-buffer (org-mode) (progn (insert "#+BEGIN_EXAMPLE\n(+ 1 1
  (org-test-with-temp-text "#+BEGIN_EXAMPLE\n(+ 1 1)\n#+END_EXAMPLE" (
  (let ((org-coderef-label-format "(ref:%s)")) (org-test-with-temp-tex
  (lambda nil (let ((org-coderef-label-format "(ref:%s)")) (org-test-w
  byte-code("\306\307!▒q\210\310\216\311 \312\216\313\314\315\316\3
  ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
  byte-code("\306\307!\211▒r\310\311!q\210\312 d\313\223)L\210\314\216
  ert-run-test([cl-struct-ert-test test-org-export/unravel-code "Test 
  ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st
  ert-run-tests("\\(org\\|ob\\)" #[(event-type &rest event-args) \30
  ert-run-tests-batch("\\(org\\|ob\\)")
  ert-run-tests-batch-and-exit("\\(org\\|ob\\)")
  (let ((org-id-track-globally t) (org-id-locations-file (convert-stan
  org-test-run-batch-tests()
  call-interactively(org-test-run-batch-tests nil nil)
  command-execute(org-test-run-batch-tests)
  command-line-1(("--eval" "(add-to-list 'load-path \"./lisp\")" "--ev
  command-line()
  normal-top-level()
Test test-org-export/unravel-code condition:
    (wrong-number-of-arguments
     #[(limit &optional granularity special structure)
313=\203:address@hidden      \306\310!\203   b\210)\311\n\205(\n\312=?
address@hidden \211CD\322CPE\323 ,\203r\324@
address@hidden@address@hidden \203\252\333@
                                                                                
                         
\"\202\332\306\334!\203\317\212\335\336\337\340\327\330!!\"\307\311#)address@hidden@!\202\332\306H!\203\327\330!I\212\335\343\307\311#)address@hidden@address@hidden)address@hidden)\354
 address@hidden 
\210\357\327\330!\226J\"address@hidden@!)\202\332\306\361!\203a\354 
address@hidden address@hidden address@hidden 
address@hidden@address@hidden@address@hidden address@hidden \"address@hidden"
       [org-element--affiliated-re opoint granularity raw-secondary-p 
case-fold-search special looking-at nil "[        ]*$" t ...]
       7
       ("/home/gratz/lisp/org-mode/lisp/org-element.elc" . 82655)]
     0)
   FAILED  327/362  test-org-export/unravel-code
--8<---------------cut here---------------end--------------->8---


Regards,
Achim.
-- 
+<[Q+ Matrix-12 WAVE#46+305 Neuron microQkb Andromeda XTk Blofeld]>+

SD adaptations for Waldorf Q V3.00R3 and Q+ V3.54R2:
http://Synth.Stromeko.net/Downloads.html#WaldorfSDada