close Warning: Can't synchronize with repository "(default)" ("(default)" is not readable or not a Git repository.). Look in the Trac log for more information.

Ticket #74: read-insert.lisp

File read-insert.lisp, 411 bytes (added by Anton Vodonosov, 9 years ago)

read-insert.lisp from cl-haml of quicklisp 2013-01-28

1(in-package :cl-haml)
3(defun read-haml-insert-line (stream &optional (eof-error-p nil)
4                                               (eof-value +eof+))
5  (list +haml+
6        (read-contents stream
7                       (read-options stream
8                                     eof-error-p
9                                     eof-value)
10                       eof-error-p
11                       eof-value)))