emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* Bug: Babel: haskell :results options output and value work contrary to docs [7.7 (release_7.7.107.g7a82)]
@ 2011-08-19 19:12 András Major
  2011-08-19 22:47 ` Eric Schulte
  0 siblings, 1 reply; 2+ messages in thread
From: András Major @ 2011-08-19 19:12 UTC (permalink / raw)
  To: emacs-orgmode

Here's another one: In a haskell code, the :results options value and
output both work erroneously.  "value" returns the output, "output"
returns nothing into the :results block.

Example code:

#+begin_src haskell :results value
  putStrLn "hello"
#+end_src

#+results:
: hello

#+begin_src haskell :results output
  putStrLn "hello"
#+end_src

#+results:

#+begin_src haskell :results value
  import System.IO
  openFile "doesNotExist.ppt" ReadMode
#+end_src

#+results:
: Prelude System.IO> *** Exception: doesNotExist.ppt: openFile: does
not exist (No such file or directory)

#+begin_src haskell :results output
  import System.IO
  openFile "doesNotExist.ppt" ReadMode
#+end_src

#+results:


This just isn't right, is it?

  András



Emacs  : GNU Emacs 23.2.1 (i486-pc-linux-gnu, GTK+ Version 2.20.0)
 of 2010-12-11 on raven, modified by Debian
Package: Org-mode version 7.7 (release_7.7.107.g7a82)

current state:
==============
(setq
 org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars)
 org-speed-command-hook '(org-speed-command-default-hook
			  org-babel-speed-command-hook)
 org-babel-load-languages '((asymptote . t) (ditaa . t) (dot . t) (gnuplot . t)
			    (haskell . t) (latex . t) (octave . t) (R . t)
			    (ruby . t) (scheme . t) (sh . t))
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-babel-tangle-lang-exts '(("ruby" . "rb") ("latex" . "tex")
			      ("haskell" . "hs") ("asymptote" . "asy")
			      ("emacs-lisp" . "el"))
 org-export-blocks-postblock-hook '(org-exp-res/src-name-cleanup)
 org-export-latex-format-toc-function 'org-export-latex-format-toc-default
 org-tab-first-hook '(org-hide-block-toggle-maybe
		      org-src-native-tab-command-maybe
		      org-babel-hide-result-toggle-maybe)
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
		     org-src-mode-configure-edit-buffer)
 org-confirm-shell-link-function 'yes-or-no-p
 org-export-first-hook '(org-beamer-initialize-open-trackers)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
		  org-cycle-show-empty-lines
		  org-optimize-window-after-visibility-change)
 org-export-preprocess-before-normalizing-links-hook
'(org-remove-file-link-modifiers)
 org-mode-hook '(#[nil "\300\301\302\303\304$\207"
		   [org-add-hook change-major-mode-hook org-show-block-all
		    append local]
		   5]
		 #[nil "\300\301\302\303\304$\207"
		   [org-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-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point
			  org-babel-execute-safely-maybe)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-export-interblocks '((lob org-babel-exp-lob-one-liners)
			  (src org-babel-exp-inline-src-blocks))
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-occur-hook '(org-first-headline-recenter)
 org-from-is-user-regexp nil
 org-export-preprocess-before-selecting-backend-code-hook
'(org-beamer-select-beamer-code)
 org-confirm-babel-evaluate nil
 org-export-latex-final-hook '(org-beamer-amend-header org-beamer-fix-toc
			       org-beamer-auto-fragile-frames
			       org-beamer-place-default-actions-for-lists)
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-export-blocks '((src org-babel-exp-src-block nil)
		     (comment org-export-blocks-format-comment t)
		     (ditaa org-export-blocks-format-ditaa nil)
		     (dot org-export-blocks-format-dot nil))
 )

^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: Bug: Babel: haskell :results options output and value work contrary to docs [7.7 (release_7.7.107.g7a82)]
  2011-08-19 19:12 Bug: Babel: haskell :results options output and value work contrary to docs [7.7 (release_7.7.107.g7a82)] András Major
@ 2011-08-19 22:47 ` Eric Schulte
  0 siblings, 0 replies; 2+ messages in thread
From: Eric Schulte @ 2011-08-19 22:47 UTC (permalink / raw)
  To: András Major; +Cc: emacs-orgmode

András Major <andras.g.major@gmail.com> writes:

> Here's another one: In a haskell code, the :results options value and
> output both work erroneously.  "value" returns the output, "output"
> returns nothing into the :results block.
>
> Example code:
>
> #+begin_src haskell :results value
>   putStrLn "hello"
> #+end_src
>
> #+results:
> : hello
>
> #+begin_src haskell :results output
>   putStrLn "hello"
> #+end_src
>
> #+results:
>
> #+begin_src haskell :results value
>   import System.IO
>   openFile "doesNotExist.ppt" ReadMode
> #+end_src
>
> #+results:
> : Prelude System.IO> *** Exception: doesNotExist.ppt: openFile: does
> not exist (No such file or directory)
>
> #+begin_src haskell :results output
>   import System.IO
>   openFile "doesNotExist.ppt" ReadMode
> #+end_src
>
> #+results:
>
>
> This just isn't right, is it?
>

No, the current behavior is not right.

These language specific files are developed as needed, and I don't
believe that ob-hsakell has seen much use up to this point.  If anyone
would submit a patch to add correct value/output behavior to ob-haskell
I would be very happy to apply it.

Thanks -- Eric

>
>   András
>
>
>
> Emacs  : GNU Emacs 23.2.1 (i486-pc-linux-gnu, GTK+ Version 2.20.0)
>  of 2010-12-11 on raven, modified by Debian
> Package: Org-mode version 7.7 (release_7.7.107.g7a82)
>
> current state:
> ==============
> (setq
>  org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars)
>  org-speed-command-hook '(org-speed-command-default-hook
> 			  org-babel-speed-command-hook)
>  org-babel-load-languages '((asymptote . t) (ditaa . t) (dot . t) (gnuplot . t)
> 			    (haskell . t) (latex . t) (octave . t) (R . t)
> 			    (ruby . t) (scheme . t) (sh . t))
>  org-metaup-hook '(org-babel-load-in-session-maybe)
>  org-after-todo-state-change-hook '(org-clock-out-if-current)
>  org-babel-tangle-lang-exts '(("ruby" . "rb") ("latex" . "tex")
> 			      ("haskell" . "hs") ("asymptote" . "asy")
> 			      ("emacs-lisp" . "el"))
>  org-export-blocks-postblock-hook '(org-exp-res/src-name-cleanup)
>  org-export-latex-format-toc-function 'org-export-latex-format-toc-default
>  org-tab-first-hook '(org-hide-block-toggle-maybe
> 		      org-src-native-tab-command-maybe
> 		      org-babel-hide-result-toggle-maybe)
>  org-src-mode-hook '(org-src-babel-configure-edit-buffer
> 		     org-src-mode-configure-edit-buffer)
>  org-confirm-shell-link-function 'yes-or-no-p
>  org-export-first-hook '(org-beamer-initialize-open-trackers)
>  org-agenda-before-write-hook '(org-agenda-add-entry-text)
>  org-babel-pre-tangle-hook '(save-buffer)
>  org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
> 		  org-cycle-show-empty-lines
> 		  org-optimize-window-after-visibility-change)
>  org-export-preprocess-before-normalizing-links-hook
> '(org-remove-file-link-modifiers)
>  org-mode-hook '(#[nil "\300\301\302\303\304$\207"
> 		   [org-add-hook change-major-mode-hook org-show-block-all
> 		    append local]
> 		   5]
> 		 #[nil "\300\301\302\303\304$\207"
> 		   [org-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-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point
> 			  org-babel-execute-safely-maybe)
>  org-confirm-elisp-link-function 'yes-or-no-p
>  org-export-interblocks '((lob org-babel-exp-lob-one-liners)
> 			  (src org-babel-exp-inline-src-blocks))
>  org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
>  org-occur-hook '(org-first-headline-recenter)
>  org-from-is-user-regexp nil
>  org-export-preprocess-before-selecting-backend-code-hook
> '(org-beamer-select-beamer-code)
>  org-confirm-babel-evaluate nil
>  org-export-latex-final-hook '(org-beamer-amend-header org-beamer-fix-toc
> 			       org-beamer-auto-fragile-frames
> 			       org-beamer-place-default-actions-for-lists)
>  org-metadown-hook '(org-babel-pop-to-session-maybe)
>  org-export-blocks '((src org-babel-exp-src-block nil)
> 		     (comment org-export-blocks-format-comment t)
> 		     (ditaa org-export-blocks-format-ditaa nil)
> 		     (dot org-export-blocks-format-dot nil))
>  )
>

-- 
Eric Schulte
http://cs.unm.edu/~eschulte/

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2011-08-21 18:16 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2011-08-19 19:12 Bug: Babel: haskell :results options output and value work contrary to docs [7.7 (release_7.7.107.g7a82)] András Major
2011-08-19 22:47 ` Eric Schulte

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).