ftp.ee.pdx.edu/2014.02.ftp.ee.pdx.edu.tar/ftp.ee.pdx.edu/pub/users/Harry/compilers/p10/tst/if.out.bak

Text File | 2006-02-17 | 5KB | 198 lines

PROGRAM IS
    VAR
        b: boolean := FALSE;
        c: boolean := b;
        i: integer := 0;
        j: integer := i;
    BEGIN
        IF (i = j) THEN
            i := 123;
        END;
        IF (b = c) THEN
            i := 456;
        END;
        IF b THEN
            i := 101;
            i := 102;
        ELSE
            i := 103;
            i := 104;
        END;
        IF b THEN
            i := 201;
            i := 202;
        ELSE
            IF NOT b THEN
                i := 203;
                i := 204;
            ELSE
                i := 205;
                i := 206;
            END;
        END;
        IF (b OR c) THEN
            i := 222;
        END;
        IF (b AND c) THEN
            i := 333;
        END;
        IF ((b OR c) AND (NOT b OR NOT c)) THEN
            i := 444;
        END;
        IF ((b OR c) AND (NOT b OR NOT c)) THEN
            i := 555;
        ELSE
            i := 666;
        END;
    END;
maxLexicalLevel = 0
=====  String List Follows  =====
=====  Float List Follows  =====
=====  Intermediate Code Follows  =====
! MAIN...
                mainEntry
! VAR INITIALIZATION...
                b := 0
! VAR INITIALIZATION...
                c := b
! VAR INITIALIZATION...
                i := 0
! VAR INITIALIZATION...
                j := i
! IF...
                if i = j then goto Label_1        (integer)
                goto Label_2
        Label_1:
! THEN...
! ASSIGNMENT STMT...
                i := 123
! END IF...
        Label_2:
! IF...
                if b = c then goto Label_3        (integer)
                goto Label_4
        Label_3:
! THEN...
! ASSIGNMENT STMT...
                i := 456
! END IF...
        Label_4:
! IF...
                if b = 0 then goto Label_6        (integer)
                goto Label_5
        Label_5:
! THEN...
! ASSIGNMENT STMT...
                i := 101
! ASSIGNMENT STMT...
                i := 102
                goto Label_7
        Label_6:
! ELSE...
! ASSIGNMENT STMT...
                i := 103
! ASSIGNMENT STMT...
                i := 104
! END IF...
        Label_7:
! IF...
                if b = 0 then goto Label_9        (integer)
                goto Label_8
        Label_8:
! THEN...
! ASSIGNMENT STMT...
                i := 201
! ASSIGNMENT STMT...
                i := 202
                goto Label_10
        Label_9:
! ELSE...
! IF...
                if b = 0 then goto Label_11        (integer)
                goto Label_12
        Label_11:
! THEN...
! ASSIGNMENT STMT...
                i := 203
! ASSIGNMENT STMT...
                i := 204
                goto Label_13
        Label_12:
! ELSE...
! ASSIGNMENT STMT...
                i := 205
! ASSIGNMENT STMT...
                i := 206
! END IF...
        Label_13:
! END IF...
        Label_10:
! IF...
                if b = 0 then goto Label_16        (integer)
                goto Label_14
        Label_16:
                if c = 0 then goto Label_15        (integer)
                goto Label_14
        Label_14:
! THEN...
! ASSIGNMENT STMT...
                i := 222
! END IF...
        Label_15:
! IF...
                if b = 0 then goto Label_18        (integer)
                goto Label_19
        Label_19:
                if c = 0 then goto Label_18        (integer)
                goto Label_17
        Label_17:
! THEN...
! ASSIGNMENT STMT...
                i := 333
! END IF...
        Label_18:
! IF...
                if b = 0 then goto Label_23        (integer)
                goto Label_22
        Label_23:
                if c = 0 then goto Label_21        (integer)
                goto Label_22
        Label_22:
                if b = 0 then goto Label_20        (integer)
                goto Label_24
        Label_24:
                if c = 0 then goto Label_20        (integer)
                goto Label_21
        Label_20:
! THEN...
! ASSIGNMENT STMT...
                i := 444
! END IF...
        Label_21:
! IF...
                if b = 0 then goto Label_28        (integer)
                goto Label_27
        Label_28:
                if c = 0 then goto Label_26        (integer)
                goto Label_27
        Label_27:
                if b = 0 then goto Label_25        (integer)
                goto Label_29
        Label_29:
                if c = 0 then goto Label_25        (integer)
                goto Label_26
        Label_25:
! THEN...
! ASSIGNMENT STMT...
                i := 555
                goto Label_30
        Label_26:
! ELSE...
! ASSIGNMENT STMT...
                i := 666
! END IF...
        Label_30:
! MAIN EXIT...
                mainExit
=======================================