From: Henry Blevins <heblevi@gmail.com>
To: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Cc: emacs-orgmode@gnu.org
Subject: Re: [PATCH] ob-scheme.el: Fix scheme blocks ignoring :results in formatting
Date: Thu, 21 Jun 2018 15:05:09 -0400 [thread overview]
Message-ID: <CABO_LAkEo=usHk_9RgqwpeBPvDtBJ7-kAEzi2WuRrmhbd2qJUw@mail.gmail.com> (raw)
In-Reply-To: <87po0kcdyh.fsf@nicolasgoaziou.fr>
[-- Attachment #1.1: Type: text/plain, Size: 337 bytes --]
Nicolas,
Attached is the patch adding tests for verbatim and list result types.
> If you haven't signed FSF papers yet, you need to add "TINYCHANGE" at
> the end of your commit message.
I have signed FSF papers. I know these are small enough changes not to
require
that and can add "TINYCHANGE" if you would prefer.
Regards,
Henry
[-- Attachment #1.2: Type: text/html, Size: 1301 bytes --]
[-- Attachment #2: 0002-test-ob-scheme.el-Add-tests-for-scheme-result-types.patch --]
[-- Type: text/x-patch, Size: 1433 bytes --]
From 564661f586501dd235f2dad6ece45d0100dc21a9 Mon Sep 17 00:00:00 2001
From: Henry Blevins <heblevi@gmail.com>
Date: Thu, 21 Jun 2018 14:56:48 -0400
Subject: [PATCH 2/2] test-ob-scheme.el: Add tests for scheme result types
* test-ob-scheme.el (test-ob-scheme/verbatim, test-ob-scheme/list):
Add tests for scheme source block output specify the results as
'verbatim' or 'list'.
---
testing/lisp/test-ob-scheme.el | 28 ++++++++++++++++++++++++++++
1 file changed, 28 insertions(+)
diff --git a/testing/lisp/test-ob-scheme.el b/testing/lisp/test-ob-scheme.el
index a3406d309..a47649436 100644
--- a/testing/lisp/test-ob-scheme.el
+++ b/testing/lisp/test-ob-scheme.el
@@ -39,6 +39,34 @@
(org-babel-execute-maybe)
(buffer-string))))
+(ert-deftest test-ob-scheme/verbatim ()
+ "Test verbatim output."
+ (equal "#+begin_src scheme
+'(1 2 3)
+#+end_src
+
+#+RESULTS:
+: (1 2 3)
+"
+ (org-test-with-temp-text "#+begin_src scheme :results verbatim\n'(1 2 3)\n#+end_src"
+ (org-babel-execute-maybe)
+ (buffer-string))))
+
+(ert-deftest test-ob-scheme/list ()
+ "Test list output."
+ (equal "#+begin_src scheme :results list
+'(1 2 3)
+#+end_src
+
+#+RESULTS:
+- 1
+- 2
+- 3
+"
+ (org-test-with-temp-text "#+begin_src scheme :results list\n'(1 2 3)\n#+end_src"
+ (org-babel-execute-maybe)
+ (buffer-string))))
+
(ert-deftest test-ob-scheme/prologue ()
"Test :prologue parameter."
(should
--
2.17.1
next prev parent reply other threads:[~2018-06-21 19:05 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2018-06-20 19:36 [PATCH] ob-scheme.el: Fix scheme blocks ignoring :results in formatting Henry Blevins
2018-06-21 16:16 ` Nicolas Goaziou
2018-06-21 19:05 ` Henry Blevins [this message]
2018-06-21 20:02 ` Nicolas Goaziou
2018-06-21 17:56 ` Neil Jerram
2018-06-21 18:44 ` Henry Blevins
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to='CABO_LAkEo=usHk_9RgqwpeBPvDtBJ7-kAEzi2WuRrmhbd2qJUw@mail.gmail.com' \
--to=heblevi@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=mail@nicolasgoaziou.fr \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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).