Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Update tests

  • Loading branch information...
commit a330cb0631ceb9120f023f219c4d4525009b8822 1 parent b97ff94
Dan Davison authored
Showing with 84 additions and 75 deletions.
  1. +51 −55 development.org
  2. +1 −1  scraps/babel-tests.org
  3. +32 −19 scraps/tests.org
View
106 development.org
@@ -9951,57 +9951,57 @@ org-babel functionality.
of these tests may fail.
#+TBLNAME: org-babel-tests
-| functionality | block | arg | expected | results | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| basic evaluation | | | | | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| emacs lisp | basic-elisp | | 5 | 5 | pass |
-| shell | basic-shell | | 6 | 6 | pass |
-| ruby | basic-ruby | | org-babel | org-babel | pass |
-| python | basic-python | | hello world | hello world | pass |
-| R | basic-R | | 13 | 13 | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| tables | | | | | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| emacs lisp | table-elisp | | 3 | 3 | pass |
-| ruby | table-ruby | | 1-2-3 | 1-2-3 | pass |
-| | table-from-ruby | | 4 | 4 | pass |
-| python | table-python | | 5 | 5 | pass |
-| | table-from-python | | 4 | 4 | pass |
-| R | table-R | | 3.5 | 3.5 | pass |
-| R: col names in R | table-R-colnames | | -3 | #ERROR | expected "-3" but was "#ERROR" |
-| R: col names in org | table-R-colnames-org | | 169 | #ERROR | expected "169" but was "#ERROR" |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| source block references | | | | | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| all languages | chained-ref-last | | Array | Array | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| source block functions | | | | | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| emacs lisp | defun-fibb | | fibbd | fibbd | pass |
-| run over | test-fibonacci | 0 | 1 | 1 | pass |
-| a | test-fibonacci | 1 | 1 | 1 | pass |
-| variety | test-fibonacci | 2 | 2 | 2 | pass |
-| of | test-fibonacci | 3 | 3 | 3 | pass |
-| different | test-fibonacci | 4 | 5 | 5 | pass |
-| arguments | test-fibonacci | 5 | 8 | 8 | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| bugs and tasks | | | | | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| simple ruby arrays | ruby-array-test | | 3 | 3 | pass |
-| R number evaluation | bug-R-number-evaluation | | 2 | 2 | pass |
-| multi-line ruby blocks | multi-line-ruby-test | | 2 | 2 | pass |
-| forcing vector results | test-forced-vector-results | | Array | Array | pass |
-| deeply nested arguments | deeply-nested-args-bug | | 4 | 4 | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| sessions | | | | | pass |
-|-------------------------+----------------------------+-----+-------------+-------------+---------------------------------|
-| set ruby session | set-ruby-session-var | | :set | :set | pass |
-| get from ruby session | get-ruby-session-var | | 3 | 3 | pass |
-| set python session | set-python-session-var | | set | | expected "set" but was "" |
-| get from python session | get-python-session-var | | 4 | | expected "4" but was "" |
-| set R session | set-R-session-var | | set | set | pass |
-| get from R session | get-R-session-var | | 5 | 5 | pass |
+| functionality | block | arg | expected | results | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| basic evaluation | | | | | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| emacs lisp | basic-elisp | | 5 | 5 | pass |
+| shell | basic-shell | | 6 | 6 | pass |
+| ruby | basic-ruby | | org-babel | org-babel | pass |
+| python | basic-python | | hello world | hello world | pass |
+| R | basic-R | | 13 | 13 | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| tables | | | | | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| emacs lisp | table-elisp | | 3 | 3 | pass |
+| ruby | table-ruby | | 1-2-3 | 1-2-3 | pass |
+| | table-from-ruby | | 4 | 4 | pass |
+| python | table-python | | 5 | 5 | pass |
+| | table-from-python | | 4 | 4 | pass |
+| R | table-R | | 3.5 | 3.5 | pass |
+| R: col names in R | table-R-colnames | | -3 | -3 | pass |
+| R: col names in org | table-R-colnames-org | | 169 | 169 | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| source block references | | | | | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| all languages | chained-ref-last | | Array | Array | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| source block functions | | | | | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| emacs lisp | defun-fibb | | fibbd | fibbd | pass |
+| run over | test-fibonacci | 0 | 1 | 1 | pass |
+| a | test-fibonacci | 1 | 1 | 1 | pass |
+| variety | test-fibonacci | 2 | 2 | 2 | pass |
+| of | test-fibonacci | 3 | 3 | 3 | pass |
+| different | test-fibonacci | 4 | 5 | 5 | pass |
+| arguments | test-fibonacci | 5 | 8 | 8 | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| bugs and tasks | | | | | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| simple ruby arrays | ruby-array-test | | 3 | 3 | pass |
+| R number evaluation | bug-R-number-evaluation | | 2 | 2 | pass |
+| multi-line ruby blocks | multi-line-ruby-test | | 2 | 2 | pass |
+| forcing vector results | test-forced-vector-results | | Array | Array | pass |
+| deeply nested arguments | deeply-nested-args-bug | | 4 | 4 | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| sessions | | | | | pass |
+|-------------------------+----------------------------+-----+-------------+-------------+------|
+| set ruby session | set-ruby-session-var | | :set | :set | pass |
+| get from ruby session | get-ruby-session-var | | 3 | 3 | pass |
+| set python session | set-python-session-var | | set | set | pass |
+| get from python session | get-python-session-var | | 4 | 4 | pass |
+| set R session | set-R-session-var | | set | set | pass |
+| get from R session | get-R-session-var | | 5 | 5 | pass |
#+TBLFM: $5='(if (= (length $3) 1) (progn (message (format "running %S" '(sbe $2 (n $3)))) (sbe $2 (n $3))) (sbe $2))::$6='(if (string= $4 $5) "pass" (format "expected %S but was %S" $4 $5))
#+TBLFM: $5=""::$6=""
@@ -10220,10 +10220,6 @@ triv.class.name
#+end_src
*** sessions
- :PROPERTIES:
- :noeval: nope
- :END:
-
#+srcname: set-ruby-session-var
#+begin_src ruby :session :results silent
var = [1, 2, 3]
View
2  scraps/babel-tests.org
@@ -228,7 +228,7 @@ table.class.name
*** sessions
:PROPERTIES:
- :noeval: nope
+ :eval: yes
:END:
#+srcname: set-ruby-session-var
View
51 scraps/tests.org
@@ -24,7 +24,7 @@
#+end_src
#+results:
-: [1] "Wed Mar 3 16:14:23 2010"
+: [1] "Mon Aug 30 11:31:17 2010"
: Luscinia
: [1] "/tmp"
@@ -34,7 +34,7 @@
#+end_src
#+results:
-: [1] "Wed Mar 3 16:14:31 2010"
+: [1] "Mon Aug 30 16:33:13 2010"
: oak
: [1] "/data/oak/user/davison/bench"
@@ -200,7 +200,7 @@ into matlab-shell.
#+end_src
#+results:
-: [1] "Tue Mar 2 15:34:32 2010"
+: [1] "Mon Aug 30 11:33:47 2010"
: Luscinia
: [1] "/home/dan"
********* remote
@@ -209,7 +209,7 @@ into matlab-shell.
#+end_src
#+results:
-: [1] "Tue Mar 2 15:34:40 2010"
+: [1] "Mon Aug 30 15:55:29 2010"
: oak
: [1] "/data/oak/user/davison/bench"
@@ -362,20 +362,18 @@ ans =
#+end_src
#+results:
-| Tue | Mar | 2 | 15:35:31 | 2010 |
-| Luscinia | | | | |
-| /tmp | | | | |
+| Mon Aug 30 08:55:46 2010 |
+| Luscinia |
+| /tmp |
********* remote
- The data is written remotely, but currently we attempt to
- read it locally.
#+begin_src R :session R-remote :dir /davison@oak.well.ox.ac.uk:bench
<<dir-test-R-value>>
#+end_src
#+results:
-| Tue | Mar | 2 | 15:35:36 | 2010 |
-| oak | | | | |
-| /data/oak/user/davison/bench | | | | |
+| Mon Aug 30 17:02:43 2010 |
+| oak |
+| /data/oak/user/davison/bench |
******* ruby
********* code
#+source: dir-test-ruby-value
@@ -518,11 +516,10 @@ x+0
#+end_src
#+results:
-| Sun | Feb | 21 | 01:10:26 | 2010 |
-| Luscinia | | | | |
-| /home/dan | | | | |
+| Mon Aug 30 09:02:57 2010 |
+| Luscinia |
+| /home/dan |
********* remote
- Runs remotely, but no results returned
#+begin_src R :dir /davison@oak.well.ox.ac.uk:~
<<dir-test-R-value>>
## system("date >> /tmp/babel-R")
@@ -531,9 +528,9 @@ x+0
#+end_src
#+results:
-| Sun | Feb | 21 | 06:10:34 | 2010 |
-| oak | | | | |
-| /home/davison | | | | |
+| Mon Aug 30 16:03:10 2010 |
+| oak |
+| /home/davison |
******* ruby
********* local
#+begin_src ruby :dir /home/dan
@@ -1069,3 +1066,19 @@ a
mogrify -resize 200% $file
echo $file
#+end_src
+
+* R session
+ :PROPERTIES:
+ :session: *R-testing*
+ :END:
+
+#+begin_src R
+2+2
+#+end_src
+
+#+results:
+: 4
+
+#+begin_src R :dir /dan@yakuba.princeton.edu: :session *R-remote*
+system("hostname", intern=TRUE)
+#+end_src
Please sign in to comment.
Something went wrong with that request. Please try again.