1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
|
```
% pandoc -f rst -t org
.. code:: haskell
:number-lines: 42
main = putStrLn "Hello World!"
unsafePerformIO main
^D
#+begin_src haskell -n 42
main = putStrLn "Hello World!"
unsafePerformIO main
#+end_src
```
```
% pandoc -f org -t native
#+begin_src lisp -n 20
(+ 1 1)
#+end_src
#+begin_src lisp +n 10
(+ 2 2)
#+end_src
^D
[ CodeBlock
( ""
, [ "commonlisp" , "numberLines" ]
, [ ( "org-language" , "lisp" ) , ( "startFrom" , "20" ) ]
)
"(+ 1 1)\n"
, CodeBlock
( ""
, [ "commonlisp" , "numberLines" , "continuedSourceBlock" ]
, [ ( "org-language" , "lisp" ) , ( "startFrom" , "10" ) ]
)
"(+ 2 2)\n"
]
```
```
% pandoc -f native -t org
[CodeBlock ("",["commonlisp","numberLines"],[("org-language","lisp"),("startFrom","20")]) "(+ 1 1)\n"
,CodeBlock ("",["commonlisp","numberLines","continuedSourceBlock"],[("org-language","lisp"),("startFrom","10")]) "(+ 2 2)\n"]
^D
#+begin_src lisp -n 20
(+ 1 1)
#+end_src
#+begin_src lisp +n 10
(+ 2 2)
#+end_src
```
|