File: ast-loop_test1-7800c18.stdout

package info (click to toggle)
lfortran 0.59.0-3
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 56,736 kB
  • sloc: cpp: 168,052; f90: 74,272; python: 17,537; ansic: 7,705; yacc: 2,345; sh: 1,334; fortran: 895; makefile: 37; javascript: 15
file content (123 lines) | stat: -rw-r--r-- 2,219 bytes parent folder | download | duplicates (4)
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
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
(TranslationUnit
    [(Program
        main
        ()
        []
        []
        [(Declaration
            (AttrType
                TypeInteger
                []
                ()
                ()
                None
            )
            []
            [(kp
            []
            []
            ()
            ()
            None
            ())]
            ()
        )
        (Declaration
            (AttrType
                TypeInteger
                []
                ()
                ()
                None
            )
            []
            [(i
            []
            []
            ()
            ()
            None
            ())
            (j
            []
            []
            ()
            ()
            None
            ())
            (do330i
            []
            []
            ()
            ()
            None
            ())]
            ()
        )]
        [(Assignment
            0
            kp
            10
            ()
        )
        (DoLoop
            0
            ()
            330
            i
            1
            kp
            ()
            [(DoLoop
                0
                ()
                320
                j
                (+ i 1)
                kp
                ()
                [(If
                    0
                    ()
                    (> 0 1)
                    [(Print
                        0
                        ()
                        [i
                        j]
                        ()
                    )]
                    [(Print
                        0
                        ()
                        [j
                        i]
                        ()
                    )]
                    ()
                    ()
                    ()
                )
                (Continue
                    320
                    ()
                )]
                ()
                ()
            )
            (Continue
                330
                ()
            )]
            ()
            ()
        )
        (Assignment
            0
            do330i
            15
            ()
        )]
        []
    )]
)