+(TranslationUnit (SymbolTable 1 {A: (DerivedType (SymbolTable 2 {x: (Variable 2 x Local () () Default (Integer 4 []) Source Public Required .false.), y: (Variable 2 y Local () () Default (Real 4 []) Source Public Required .false.)}) A [x y] Source Public ()), _lpython_main_program: (Subroutine (SymbolTable 6 {}) _lpython_main_program [] [(SubroutineCall 1 g () [] ())] Source Public Implementation () .false. .false.), f: (Subroutine (SymbolTable 3 {a: (Variable 3 a In () () Default (CPtr) BindC Public Required .true.), a1: (Variable 3 a1 Local () () Default (Derived 1 A []) Source Public Required .false.), a2: (Variable 3 a2 Local () () Default (Pointer (Derived 1 A [])) Source Public Required .false.), x: (Variable 3 x Local () () Default (Integer 4 []) Source Public Required .false.), y: (Variable 3 y Local () () Default (Real 4 []) Source Public Required .false.)}) f [(Var 3 a)] [(= (Var 3 a1) (DerivedTypeConstructor 1 A [(IntegerConstant 3 (Integer 4 [])) (Cast (RealConstant 3.25000000000000000e+00 (Real 8 [])) RealToReal (Real 4 []) (RealConstant 3.25000000000000000e+00 (Real 4 [])))] (Derived 1 A []) ()) ()) (= (Var 3 a2) (GetPointer (Var 3 a1) (Pointer (Derived 1 A [])) ()) ()) (= (Var 3 x) (DerivedRef (Var 3 a2) 2 x (Integer 4 []) ()) ()) (= (Var 3 y) (DerivedRef (Var 3 a2) 2 y (Real 4 []) ()) ()) (Assert (Compare (Var 3 x) Eq (IntegerConstant 3 (Integer 4 [])) (Logical 4 []) () ()) ()) (Assert (Compare (Cast (Var 3 y) RealToReal (Real 8 []) ()) Eq (RealConstant 3.25000000000000000e+00 (Real 8 [])) (Logical 4 []) () ()) ()) (CPtrToPointer (Var 3 a) (Var 3 a2) ()) (Print () [(Var 3 a) (Var 3 a2)])] BindC Public Implementation () .false. .false.), g: (Subroutine (SymbolTable 4 {b: (Variable 4 b Local () () Default (CPtr) Source Public Required .false.)}) g [] [(SubroutineCall 1 f () [((Var 4 b))] ())] Source Public Implementation () .false. .false.), main_program: (Program (SymbolTable 5 {}) main_program [] [(SubroutineCall 1 _lpython_main_program () [] ())])}) [])
0 commit comments