emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Bug: Subtle bug with calling "noweb" blocks with already computed :resul


From: Vladimir Nikishkin
Subject: Bug: Subtle bug with calling "noweb" blocks with already computed :results output code and :cache yes [9.3.4 (9.3.4-5-ga0f3bb-elpa @ /home/lockywolf/.emacs.d/elpa/org-20200210/)]
Date: Thu, 28 May 2020 11:09:53 +0800


Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report?  See

     https://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org mailing list.
------------------------------------------------------------------------

This bug is a bit hard to formulate. Have a look at the following
org-file. Even though it's big, it's almost an MWE:

```

# -*- mode: org;  -*-

* Test
:PROPERTIES:
:header-args:    :cache yes :noweb yes
:END:


#+name: empty
#+begin_quote

#+end_quote

#+name: runner
#+header: :stdin empty  :exports code
#+begin_src shell :results output code :exports both
printf "%s\n%s" "Test string" "Test string2"
#+end_src

#+RESULTS[16ba04c7554c3436156f295ef43c8a0d2f2d9270]: runner
#+begin_src shell
Test string
Test string2
#+end_src


#+name: c-test-preserving-standard
#+header: :stdin empty  :exports code
#+begin_src shell :results output code
<<runner>>
#+end_src

#+RESULTS[16ba04c7554c3436156f295ef43c8a0d2f2d9270]: c-test-preserving-standard
#+begin_src shell
Test string
Test string2
#+end_src

#+name: c-test-preserving-unoptimized
#+header: :stdin empty  :exports code
#+begin_src shell :results output
<<runner>>
#+end_src

#+RESULTS[f9468f703a0c54b8601296d5332d51743d70fd05]: 
c-test-preserving-unoptimized
: Test string
: Test string2


#+header: :stdin empty
#+begin_src shell :results output code :wrap src patch :exports both
  output1=$(
  cat <<'EOF'
  <<c-test-preserving-standard()>>
  EOF
  )


  output2=$(
  cat <<'EOF'
  <<c-test-preserving-unoptimized()>>
  EOF
  )

  diff -w -s -y <(echo "$output1") <(echo "$output2") | nl -w2 - 
#+end_src

#+RESULTS[2b14ae1ffc337f1857d2a3a75e890c3c3cb03d87]:
#+begin_src patch
 1      nil                                                           | Test 
string
 2                                                                    > Test 
string2
#+end_src

```

You can see that the patch gives two different results for an identical body.

The difference really is in: ":results output code"

This is a bit hard to reproduce, because it also seems to depend on
whether the block was cached, but I find it hard to formulate how
exactly.

In any case, the desired behaviour for me seems to be: take both results from
cache, if they are available, and run the comparison block. If the
cache is outdated, run each outdated block, update the cache, and feed
the cache results into the comparison block.

At the moment org doesn't seem to be updating the cache.

I can imagine thought that if the block output is considered "code",
someone may feel inclined to run the code instead of feeding it verbatim.


Emacs  : GNU Emacs 26.3 (build 1, x86_64-slackware-linux-gnu, GTK+ Version 
3.24.12)
 of 2019-11-26
Package: Org mode version 9.3.4 (9.3.4-5-ga0f3bb-elpa @ 
/home/lockywolf/.emacs.d/elpa/org-20200210/)

current state:
==============
(setq
 org-src-mode-hook '((lambda nil (modify-syntax-entry 60 ".") 
(modify-syntax-entry 62 ".")
                      (setq geiser-autodoc--inhibit t))
                     org-src-babel-configure-edit-buffer 
org-src-mode-configure-edit-buffer)
 org-latex-listings t
 org-link-shell-confirm-function 'yes-or-no-p
 org-babel-after-execute-hook '((lambda nil
                                 (if org-inline-image-overlays
                                  (progn (org-redisplay-inline-images)))
                                 )
                                )
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-export-with-sub-superscripts '{}
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-html-format-inlinetask-function 
'org-html-format-inlinetask-default-function
 org-pretty-entities t
 org-odt-format-headline-function 'org-odt-format-headline-default-function
 org-link-descriptive nil
 org-latex-pdf-process '("latexmk  -lualatex -outdir=%o -f %f")
 org-agenda-files '("~/Personal_Planner/Planner.org" 
"~/Personal_Planner/lockywolf_net.org"
                    "~/Personal_Planner/cyberpunk_smarthome.org"
                    "~/Personal_Planner/notes.org"
                    "~/Personal_Planner/2020-04-28-hotkeys-to-remember.txt.org"
                    "~/DevLinux/chibi-sicp/index.org")
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-modules '(org-habit ol-w3m ol-bbdb ol-bibtex ol-docview ol-gnus ol-info 
ol-irc ol-mhe
               ol-rmail ol-eww)
 org-plantuml-jar-path "/usr/local/bin/plantuml.jar"
 org-mode-hook '(#[0 "\301\211\207" [imenu-create-index-function 
org-imenu-get-tree] 2]
                 turn-on-org-cdlatex org-tempo-setup
                 (lambda nil
                  (add-to-list (quote org-structure-template-alist)
                   (quote ("p" . "src plantuml :noweb no :exports both :file 
")))
                  (add-to-list (quote org-structure-template-alist)
                   (quote ("SO" . "src scheme :exports both :results output")))
                  (add-to-list (quote org-structure-template-alist)
                   (quote ("SV" . "src scheme :exports both :results value")))
                  (add-to-list (quote org-structure-template-alist)
                   (quote ("SE" . "src scheme :exports code")))
                  (add-to-list (quote org-structure-template-alist)
                   (quote ("EL" . "src elisp :exports both :results output")))
                  (add-to-list (quote org-structure-template-alist)
                   (quote ("F" . "src f90 :exports both :results output")))
                  )
                 (lambda nil (modify-syntax-entry 60 ".") (modify-syntax-entry 
62 "."))
                 (lambda nil (imenu-add-to-menubar "Imenu"))
                 #[0 "\300\301\302\303\304$\207"
                   [add-hook change-major-mode-hook org-show-all append local] 
5]
                 #[0 "\300\301\302\303\304$\207"
                   [add-hook change-major-mode-hook org-babel-show-result-all 
append local] 5]
                 org-babel-result-hide-spec org-babel-hide-all-hashes 
org-eldoc-load)
 org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-preview-latex-default-process 'imagemagick
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-bibtex-headline-format-function #[257 "\300\236A\207" [:title] 3 "\n\n(fn 
ENTRY)"]
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
 org-babel-pre-tangle-hook '(save-buffer)
 org-latex-compiler "lualatex"
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe 
org-babel-header-arg-expand)
 org-babel-load-languages '((plantuml . t) (C . t) (scheme . t) (latex . t) 
(shell . t)
                            (fortran . t))
 org-log-done 'time
 org-link-abbrev-alist '(("bugzilla" . 
"http://10.1.2.9/bugzilla/show_bug.cgi?id=";)
                         ("url-to-ja" .
                          
"http://translate.google.fr/translate?sl=en&tl=ja&u=%h";)
                         ("google" . "http://www.google.com/search?q=";)
                         ("gmap" . "http://maps.google.com/maps?q=%s";)
                         ("omap" . 
"http://nominatim.openstreetmap.org/search?q=%s&polygon=1";)
                         ("ads" . 
"https://ui.adsabs.harvard.edu/search/q=%20author%3A\"%s\"";)
                         ("note" .
                          
"rtcite:~/GDrive_vladimir_nikishkin_AT_phystech_edu/BibTeX_Bibliography/bibliography-bib.org::#%s")
                         ("bib" .
                          
"rtcite:~/GDrive_vladimir_nikishkin_AT_phystech_edu/BibTeX_Bibliography/bibliography-bib.bib::%s")
                         )
 org-startup-align-all-tables t
 org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS 
WIDTH)"]
 org-src-lang-modes '(("arduino" . arduino) ("redis" . redis) ("php" . php) 
("C" . c)
                      ("C++" . c++) ("asymptote" . asy) ("bash" . sh) ("beamer" 
. latex)
                      ("calc" . fundamental) ("cpp" . c++) ("ditaa" . artist)
                      ("dot" . fundamental) ("elisp" . emacs-lisp) ("ocaml" . 
tuareg)
                      ("screen" . shell-script) ("shell" . sh) ("sqlite" . sql))
 org-catch-invisible-edits 'show
 org-occur-hook '(org-first-headline-recenter)
 org-log-into-drawer t
 org-edit-src-auto-save-idle-delay 15
 org-agenda-include-diary t
 org-structure-template-alist '(("F" . "src f90 :exports both :results output")
                                ("EL" . "src elisp :exports both :results 
output")
                                ("SE" . "src scheme :exports code")
                                ("SV" . "src scheme :exports both :results 
value")
                                ("SO" . "src scheme :exports both :results 
output")
                                ("p" . "src plantuml :noweb no :exports both 
:file ")
                                ("a" . "export ascii") ("c" . "center") ("C" . 
"comment")
                                ("e" . "example") ("E" . "export") ("h" . 
"export html")
                                ("l" . "export latex") ("q" . "quote") ("s" . 
"src")
                                ("v" . "verse"))
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-edit-src-turn-on-auto-save t
 org-speed-command-hook '(org-speed-command-activate 
org-babel-speed-command-activate)
 org-hierarchical-todo-statistics nil
 org-preview-latex-process-alist '((dvipng :programs ("latex" "dvipng") 
:description
                                    "dvi > png" :message
                                    "you need to install the programs: latex 
and dvipng."
                                    :image-input-type "dvi" :image-output-type 
"png"
                                    :image-size-adjust (1.0 . 1.0) 
:latex-compiler
                                    ("latex -interaction nonstopmode 
-output-directory %o %f")
                                    :image-converter ("dvipng -D %D -T tight -o 
%O %f"))
                                   (dvisvgm :programs ("latex" "dvisvgm") 
:description
                                    "dvi > svg" :message
                                    "you need to install the programs: latex 
and dvisvgm."
                                    :image-input-type "dvi" :image-output-type 
"svg"
                                    :image-size-adjust (1.7 . 1.5) 
:latex-compiler
                                    ("latex -interaction nonstopmode 
-output-directory %o %f")
                                    :image-converter ("dvisvgm %f -n -b min -c 
%S -o %O"))
                                   (imagemagick :programs ("latex" "convert") 
:description
                                    "pdf > png" :message
                                    "you need to install the programs: latex 
and imagemagick."
                                    :image-input-type "pdf" :image-output-type 
"png"
                                    :image-size-adjust (1.0 . 1.0) 
:latex-compiler
                                    ("lualatex -interaction nonstopmode 
-output-directory %o %f")
                                    :image-converter
                                    ("convert -density %D -trim -antialias %f 
-quality 100 %O")
                                    )
                                   )
 org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
 org-babel-tangle-lang-exts '(("fortran" . "F90") ("latex" . "tex") ("D" . "d")
                              ("C++" . "cpp") ("emacs-lisp" . "el") ("elisp" . 
"el"))
 org-format-latex-options '(:foreground default :background default :scale 3.0
                            :html-foreground "Black" :html-background 
"Transparent"
                            :html-scale 1.0 :matchers ("begin" "$1" "$" "$$" 
"\\(" "\\["))
 org-latex-listings-langs '((patch "bash") (shell "bash") (plantuml "MetaPost")
                            (elisp "elisp") (scheme "Lisp") (emacs-lisp "Lisp") 
(lisp "Lisp")
                            (clojure "Lisp") (c "C") (cc "C++") (fortran 
"fortran")
                            (perl "Perl") (cperl "Perl") (python "Python") 
(ruby "Ruby")
                            (html "HTML") (xml "XML") (tex "TeX") (latex 
"[LaTeX]TeX")
                            (shell-script "bash") (gnuplot "Gnuplot") (ocaml 
"Caml")
                            (caml "Caml") (sql "SQL") (sqlite "sql") (makefile 
"make")
                            (R "r"))
 org-confirm-shell-link-function 'yes-or-no-p
 org-link-parameters '(("attachment" :follow org-attach-open-link :export
                        org-attach-export-link :complete 
org-attach-complete-link)
                       ("id" :follow org-id-open)
                       ("eww" :follow eww :store org-eww-store-link)
                       ("rmail" :follow org-rmail-open :store 
org-rmail-store-link)
                       ("mhe" :follow org-mhe-open :store org-mhe-store-link)
                       ("irc" :follow org-irc-visit :store org-irc-store-link 
:export
                        org-irc-export)
                       ("info" :follow org-info-open :export org-info-export 
:store
                        org-info-store-link)
                       ("gnus" :follow org-gnus-open :store org-gnus-store-link)
                       ("docview" :follow org-docview-open :export 
org-docview-export :store
                        org-docview-store-link)
                       ("bibtex" :follow org-bibtex-open :store 
org-bibtex-store-link)
                       ("bbdb" :follow org-bbdb-open :export org-bbdb-export 
:complete
                        org-bbdb-complete-link :store org-bbdb-store-link)
                       ("w3m" :store org-w3m-store-link)
                       ("rtcite" :follow org-bibtex-open :export 
my-rtcite-export-handler)
                       ("file+sys") ("file+emacs") ("shell" :follow 
org-link--open-shell)
                       (#1="news" :follow
                        #[257 #2="\301\300\302Q!\207" [#1# browse-url #4=":"] 5 
#5=
                          "\n\n(fn URL)"]
                        )
                       (#3="mailto" :follow #[257 #2# [#3# browse-url #4#] 5 
#5#])
                       (#6="https" :follow #[257 #2# [#6# browse-url #4#] 5 
#5#])
                       (#7="http" :follow #[257 #2# [#7# browse-url #4#] 5 #5#])
                       (#8="ftp" :follow #[257 #2# [#8# browse-url #4#] 5 #5#])
                       ("help" :follow org-link--open-help)
                       ("file" :complete org-link-complete-file)
                       ("elisp" :follow org-link--open-elisp)
                       ("doi" :follow org-link--open-doi))
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-agenda-start-with-follow-mode t
 org-link-elisp-confirm-function 'yes-or-no-p
 org-org-src-mode-hook '((lambda nil (modify-syntax-entry 60 ".")
                          (modify-syntax-entry 62 "."))
                         )
 org-latex-format-inlinetask-function 
'org-latex-format-inlinetask-default-function
 org-tab-before-tab-emulation-hook '(org-tempo-complete-tag)
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-latex-packages-alist '((#1="" "color") (#1# "listings"))
 org-image-actual-width nil
 org-html-use-infojs t
 org-latex-classes '(("acmart"
                      
"\\documentclass[sigplan,anonymous,review,timestamp,natbib=false]{acmart}"
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("article" "\\documentclass[11pt]{article}"
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
                      ("\\paragraph{%s}" . "\\paragraph*{%s}")
                      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
                     ("report" "\\documentclass[11pt]{report}" ("\\part{%s}" . 
"\\part*{%s}")
                      ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     ("book" "\\documentclass[11pt]{book}" ("\\part{%s}" . 
"\\part*{%s}")
                      ("\\chapter{%s}" . "\\chapter*{%s}")
                      ("\\section{%s}" . "\\section*{%s}")
                      ("\\subsection{%s}" . "\\subsection*{%s}")
                      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
                     )
 org-html-format-headline-function 'org-html-format-headline-default-function
 org-confirm-babel-evaluate 'my-org-confirm-babel-evaluate
 org-use-sub-superscripts '{}
 org-latex-listings-options '(("numbers" "left") ("frame" "single"))
 org-use-speed-commands t
 org-latex-bib-compiler "biber"
 org-default-notes-file "~/Personal_Planner/notes.org"
 )
-- 
--
Vladimir Nikishkin (MiEr, lockywolf)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]