Commit aa7e32af authored by garciay's avatar garciay
Browse files

Add with encode "UpperTester"

Add a_shutdown altstep
Move f_prInitialState() into f_cfUp()
parent 2687f916
Loading
Loading
Loading
Loading
+22 −2
Original line number Diff line number Diff line
@@ -80,6 +80,18 @@ module LibItsMapSpat_Functions {
    
    group altsteps {
        
        /**
         * @desc Default handling cf01 de-initialisation.
         */
        altstep a_cf01Down() runs on ItsMapSpat {
            [] a_shutdown() {
                f_poDefault();
                f_cfDown();
                log("*** a_cf01Down: INFO: TEST COMPONENT NOW STOPPING ITSELF! ***");
                stop;
            }
        }
        
        /**
         * @desc The base default.
         */
@@ -144,7 +156,14 @@ module LibItsMapSpat_Functions {
            
            map(self:utPort, system:utPort);
            map(self:mapSpatPort, system:mapSpatPort);
            
            // Connect
            f_connect4SelfOrClientSync();
            activate(a_cf01Down());
            
            //Initialze the IUT
            f_prInitialState();
            
        } // end f_cfUp
        
        /**
@@ -154,6 +173,7 @@ module LibItsMapSpat_Functions {
            
            unmap(self:utPort, system:utPort);
            unmap(self:mapSpatPort, system:mapSpatPort);
            
            f_disconnect4SelfOrClientSync();
        } // end f_cfDown
        
@@ -194,7 +214,7 @@ module LibItsMapSpat_Functions {
        
    } // end group postambles
        
    group postambles {
    group extFunctions {

        /**
         * @desc    External function to compute distance between two points
@@ -203,6 +223,6 @@ module LibItsMapSpat_Functions {
         */
        external function fx_checkUperEncoding ( in RawData p_rawData ) return boolean;

    } // end group postambles
    } // end group extFunctions

} // end LibItsMapSpat_Functions
 No newline at end of file
+9 −7
Original line number Diff line number Diff line
@@ -65,6 +65,8 @@ module LibItsMapSpat_TypesAndValues {
         */
        type record of UtMapEventInd UtMapEventIndList;
        type record of UtSpatEventInd UtSpatEventIndList;
    } with {
        encode "UpperTester"
    }

} // end LibItsMapSpat_TypesAndValues
 No newline at end of file