diff --git a/tests/resources/read-insert.lisp b/tests/resources/read-insert.lisp new file mode 100644 index 0000000000000000000000000000000000000000..cae19a492a74b6130cd6c704be71d22d0d5d6a68 --- /dev/null +++ b/tests/resources/read-insert.lisp @@ -0,0 +1,11 @@ +(in-package :cl-haml) + +(defun read-haml-insert-line (stream &optional (eof-error-p nil) + (eof-value +eof+)) + (list +haml+ + (read-contents stream + (read-options stream + eof-error-p + eof-value) + eof-error-p + eof-value)))