xref: /Universal-ctags/Units/parser-scheme.r/scheme-simple-define.d/input.scm (revision f49b9a7bc1f6c31346afab705ead0768de94066c)
1(define a0 1)
2(define a1 "a")
3(define a2 '(a))
4(define a3 '(a b))
5(define a4 '(a . b))
6(define a5 '(a b c))
7(define a6 '(a b . c))
8(define a7 '(a
9	     b . c))
10(define a8
11  '(a b . c))
12
13(define
14  a9 '(a b . c))
15
16(define
17  aa
18  '(a b . c))
19
20(define (b0) 1)
21(define (b1 a) 1)
22(define (b2 a b) 1)
23(define (b3 a . b) 1)
24(define (b4 a
25	    b) 1)
26(define (b5
27	 a b) 1)
28(define (b6
29	 a . b) 1)
30(define (b7
31	 a . b)
32  1)
33
34(define (
35	 b8
36	 a . b)
37  1)
38
39(define
40  (
41   b9
42   a . b)
43  1)
44
45(define
46  (ba
47   a . b)
48  1)
49
50(define ((c0)) 1)
51(define ((c1) a) 1)
52(define ((c2) a b) 1)
53(define ((c3) a . b) 1)
54(define ((c4) a
55	 b) 1)
56(define ((c5)
57	 a b) 1)
58(define ((c6)
59	 a . b) 1)
60(define ((c7)
61	 a . b)
62  1)
63
64(define ((
65	  c8)
66	 a . b)
67  1)
68
69(define (
70	 (
71	  c9)
72	 a . b)
73  1)
74
75(define
76  (
77   (
78    ca)
79   a . b)
80  1)
81
82;; incomplete input
83(define
84