==================
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)))))