blob: d84e20fd75b9cf321aaa73617249acf497bdbd39 (
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
|
==================
take_const_address
==================
program()
var
x: ^const Int
y: const Int := 1
begin
x := @y
end.
---
(source_file
(program_declaration
(var_section
(variable_declaration
(identifier_definition
(identifier))
(pointer_type
(const_type
(identifier))))
(variable_declaration
(identifier_definition
(identifier))
(const_type
(identifier))
(literal
(integer))))
(assignment_statement
(identifier)
(unary_expression
(identifier)))))
|
