5178.md

```
% 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
```