Units: fix a broken test case

guest-in-optlib-single-line.d has not been tested at all
because input.single file was not added in 6cdf571.

Signed-off-by: Masatake YAMATO <[email protected]>

Author: masatake

Units/guest-in-optlib-single-line.d/args.ctags

@@ -9,20 +9,19 @@
 
 --regex-single=/^DEF:([a-zA-Z0-9]+)/\1/d
 
---regex-single=/^BEGIN:([a-zA-Z0-9]+)$//{guest=\1,0end,}
---regex-single=/^BEGIN$//{guest=,0end,}
---regex-single=/^END:([a-zA-Z0-9]+)$//{guest=\1,,0start}
---regex-single=/^END$//{guest=,,0start}
-
---regex-single=/^BEGIN_FILE:([a-zA-Z0-9.]+)$//{guest=*1,0end,}
---regex-single=/^BEGIN_FILE$//{guest=,0end,}
---regex-single=/^END_FILE:([a-zA-Z0-9.]+)$//{guest=*1,,0start}
---regex-single=/^END_FILE$//{guest=,,0start}
-
---regex-single=/^BEGIN_C$//{guest=C,0end,}
---regex-single=/^END_C$//{guest=C,,0start}
-
---regex-single=/^(BEGIN:([a-zA-Z0-9]+)<).*(>END)$//{guest=\2,1end,3start}
---regex-single=/^BEGIN_FILE:([a-zA-Z0-9.]+)<(.*)>END_FILE$//{guest=*1,2start,2end}
---regex-single=/^(BEGIN_C<).*(>END_C)$//{guest=C,1end,2start}
-
+--regex-single=/^BEGIN:([a-zA-Z0-9]+)$//{_guest=\1,0end,}
+--regex-single=/^BEGIN$//{_guest=,0end,}
+--regex-single=/^END:([a-zA-Z0-9]+)$//{_guest=\1,,0start}
+--regex-single=/^END$//{_guest=,,0start}
+
+--regex-single=/^BEGIN_FILE:([a-zA-Z0-9.]+)$//{_guest=*1,0end,}
+--regex-single=/^BEGIN_FILE$//{_guest=,0end,}
+--regex-single=/^END_FILE:([a-zA-Z0-9.]+)$//{_guest=*1,,0start}
+--regex-single=/^END_FILE$//{_guest=,,0start}
+
+--regex-single=/^BEGIN_C$//{_guest=C,0end,}
+--regex-single=/^END_C$//{_guest=C,,0start}
+
+--regex-single=/^(BEGIN:([a-zA-Z0-9]+)<).*(>END)$//{_guest=\2,1end,3start}
+--regex-single=/^BEGIN_FILE:([a-zA-Z0-9.]+)<(.*)>END_FILE$//{_guest=*1,2start,2end}
+--regex-single=/^(BEGIN_C<).*(>END_C)$//{_guest=C,1end,2start}

Units/guest-in-optlib-single-line.d/expected.tags

@@ -22,9 +22,9 @@ f4	input.single	/^int f4 (void)$/;"	f	line:37	language:C	typeref:typename:int
 f5	input.single	/(defun f5 () (list))/;"	f	line:46	language:Lisp
 f6	input.single	/(defun f6 () (list))/;"	f	line:50	language:Lisp
 f7	input.single	/int f7 (void) { return 0; }/;"	f	line:54	language:C	typeref:typename:int
-v0	input-0.single	/(defvar v0 0/;"	f	line:1	language:Lisp
+v0	input-0.single	/(defvar v0 0/;"	v	line:1	language:Lisp
 g0	input-1.single	/^(defun g0 () (list))$/;"	f	line:2	language:Lisp
 g1	input-1.single	/^int g1 (void) { return 0; }$/;"	f	line:6	language:C	typeref:typename:int
 g2	input-1.single	/^function g2$/;"	f	line:10	language:Sh
 EOF	input-1.single	/^	cat > foo.rst <<EOF$/;"	h	line:12	language:Sh
-G2 on g2	input-1.single	/^G2 on g2$/;"	c	line:14	language:ReStructuredText
+G2 on g2	input-1.single	/^G2 on g2$/;"	H	line:14	language:ReStructuredText

Units/guest-in-optlib-single-line.d/input.single

@@ -0,0 +1,55 @@
+DEF:S0
+
+BEGIN:lisp
+(defun f0 () (list))
+END
+
+DEF:E0
+
+
+DEF:S1
+
+BEGIN
+(defun f1 () (list))
+END:lisp
+
+DEF:E1
+
+DEF:S2
+
+BEGIN_FILE:foo.cl
+(defun f2 () (list))
+END_FILE
+
+DEF:E2
+
+DEF:S3
+
+BEGIN_FILE
+(defun f3 () (list))
+END_FILE:foo.cl
+
+DEF:E3
+
+DEF:S4
+
+BEGIN_C
+int f4 (void)
+{
+	return 0;
+}
+END_C
+
+DEF:E4
+
+DEF:S5
+BEGIN:lisp<(defun f5 () (list))>END
+DEF:E5
+
+DEF:S6
+BEGIN_FILE:bar.cl<(defun f6 () (list))>END_FILE
+DEF:E6
+
+DEF:S7
+BEGIN_C<int f7 (void) { return 0; }>END_C
+DEF:E7