aboutsummaryrefslogtreecommitdiff
path: root/tools/tree-sitter/test/corpus/double_literals.txt
blob: 9dc7cc163ae4b3119c731162d9bf8177d0804279 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
==================
double_literals
==================

module

proc f()
var
  x: const Double := 3.14
  y: const Double := 1e10
  z: const Double := 4.567e8
  t: const Double := 2.5E-3
return

end.

---

(source_file
  (module_declaration
    (procedure_declaration
      (identifier_definition
        (identifier))
      (parameter_list)
      (procedure_body
        (block
          (var_section
            (variable_declaration
              (identifier_definition
                (identifier))
              (const_type
                (identifier))
              (literal
                (float)))
            (variable_declaration
              (identifier_definition
                (identifier))
              (const_type
                (identifier))
              (literal
                (float)))
            (variable_declaration
              (identifier_definition
                (identifier))
              (const_type
                (identifier))
              (literal
                (float)))
            (variable_declaration
              (identifier_definition
                (identifier))
              (const_type
                (identifier))
              (literal
                (float)))))
        (return_clause)))))