picolisp

commit be6ab003e26cba534c99a0c7bc079011fa3ae52f
parent bd1c0d37f81735b5398582213efc6b0b504c94a7
Author: Alexander Burger <abu@software-lab.de>
Date:   Fri, 29 Jul 2011 10:08:14 +0200

'\\figure' function
Diffstat:
M
lib/tex.l
 | 
5
+++++

1 file changed, 5 insertions(+), 0 deletions(-)
diff --git a/lib/tex.l b/lib/tex.l
@@ -77,6 +77,11 @@
    (prEval Prg 2)
    (prinl "\\end{" S "}") )
 
+(de \\figure (S . Prg)
+   (prinl "\\begin{figure}" S)
+   (prEval Prg 2)
+   (prinl "\\end{figure}") )
+
 
 ### Tabular environment ###
 (de \\table (Fmt . Prg)