TEMP variable

This test case it part of the test suite proposed for new devices.

Test case ID: R0290
Language: ST

Code:
tests2/t0290.st

FUNCTION_BLOCK FB_R0290
    VAR_INPUT    i : INT;    END_VAR
    VAR_OUTPUT    otemp, ononTemp : INT;    END_VAR
    VAR_TEMP    temp : INT := 3;    END_VAR
    VAR            nonTemp : INT := 3;    END_VAR

    temp := temp + i;
    nonTemp := nonTemp + i;
    
    
    otemp := temp;
    ononTemp := nonTemp;
    
END_FUNCTION_BLOCK

PROGRAM R0290
    VAR    
        i, o, oo : INT;
        fb : FB_R0290;    
    END_VAR

    i := 7;
    fb(i:=i, otemp=>o, ononTemp=>oo);
    fb(i:=i, otemp=>o, ononTemp=>oo);

_GEB_ASSERT_(o = 10);
_GEB_ASSERT_(oo = 17);
    
END_PROGRAM