Commit d0b5e2a9 authored by stancakapost's avatar stancakapost
Browse files

float + integer

parent e2b8d7fc
Loading
Loading
Loading
Loading
+9 −0
Original line number Diff line number Diff line
/***************************************************
 ** @author   STF 409
 ** @version  $Rev: 21 $
 ** @purpose  1:6.1.0, Assign float to integer values
 ** @verdict  pass reject
 ***************************************************/
module NegSyn_060100_SimpleBasicTypes_001 {
    const integer i1 := 0.0;
}
 No newline at end of file
+9 −0
Original line number Diff line number Diff line
/***************************************************
 ** @author   STF 409
 ** @version  $Rev: 21 $
 ** @purpose  1:6.1.0, Assign boolean to integer values
 ** @verdict  pass reject
 ***************************************************/
module NegSyn_060100_SimpleBasicTypes_002 {
    const integer i1 := true;
}
 No newline at end of file
+9 −0
Original line number Diff line number Diff line
/***************************************************
 ** @author   STF 409
 ** @version  $Rev: 21 $
 ** @purpose  1:6.1.0, Assign integer to float values
 ** @verdict  pass reject
 ***************************************************/
module NegSyn_060100_SimpleBasicTypes_001 {
    const float f1 := 0;
}
 No newline at end of file
+9 −0
Original line number Diff line number Diff line
/***************************************************
 ** @author   STF 409
 ** @version  $Rev: 21 $
 ** @purpose  1:6.1.0, Assign boolean to float values
 ** @verdict  pass reject
 ***************************************************/
module NegSyn_060100_SimpleBasicTypes_002 {
    const float f1 := true;
}
 No newline at end of file
+25 −0
Original line number Diff line number Diff line
/***************************************************
 ** @author   STF 409
 ** @version  $Rev:  $
 ** @purpose  1:6.1.0, Assign and read float values
 ** @verdict  pass accept, ttcn3verdict:pass
 ***************************************************/
module Sem_060100_SimpleBasicTypes_003 {

    const float f := 5.12E-5;
    
    type component GeneralComp {}
    
    testcase TC_Sem_610_SimpleBasicTypes_001() runs on GeneralComp {
    	if (f > 5E-5){
    		setverdict(pass);
    	}
    	else {
    		setverdict(fail);
    	}
    }
    
    control{
        execute(TC_Sem_610_SimpleBasicTypes_001());
    }
}
 No newline at end of file
Loading