********** source program ********** fn main () -> Int { if ((0 == 1)) return 1; else return 0; } ********** type checking ********** --- step exp Int ---> --- step exp Int ---> ********** type checking complete ********** fn main () -> Int { if ((0 == 1)) return 1; else return 0; } ********** starting execution ********** ********** initializing globals ********** --- step exp () ---> ********** calling main function ********** { stack: top{main()<-1>} heap: fun
, env: main: fun
, } --- step exp main() ---> { stack: top{main<-1> :: main()<0>} heap: fun
, env: main: fun
, } --- step exp main ---> { stack: top{fun
<-1> :: main()<0>} heap: fun
, env: main: fun
, } --- handle value fun
with main()<1>(fun
,) ---> { stack: top{()<-1> :: main()<1>(fun
,)} heap: fun
, env: main: fun
, } --- step exp () ---> { stack: top{()<-1> :: main()<1>(fun
,)} heap: fun
, env: main: fun
, } --- handle value () with main()<2>(fun
,(),) ---> pattern_match((), ()) { stack: main{if ((0 == 1)) ... else ... <-1>} :: top{} heap: fun
, env: main: fun
, } --- step stmt if ((0 == 1)) ... else ... ---> { stack: main{if ((0 == 1)) ... else <-1> :: return 0;<-1>} :: top{} heap: fun
, env: main: fun
, } --- step stmt if ((0 == 1)) ... else ---> { stack: main{(0 == 1)<-1> :: if ((0 == 1)) ... else <0> :: return 0;<-1>} :: top{} heap: fun
, env: main: fun
, } --- step exp (0 == 1) ---> { stack: main{0<-1> :: (0 == 1)<0> :: if ((0 == 1)) ... else <0> :: return 0;<-1>} :: top{} heap: fun
, env: main: fun
, } --- step exp 0 ---> { stack: main{0<-1> :: (0 == 1)<0> :: if ((0 == 1)) ... else <0> :: return 0;<-1>} :: top{} heap: fun
, env: main: fun
, } --- handle value 0 with (0 == 1)<1>(0,) ---> { stack: main{1<-1> :: (0 == 1)<1>(0,) :: if ((0 == 1)) ... else <0> :: return 0;<-1>} :: top{} heap: fun
, env: main: fun
, } --- step exp 1 ---> { stack: main{1<-1> :: (0 == 1)<1>(0,) :: if ((0 == 1)) ... else <0> :: return 0;<-1>} :: top{} heap: fun
, env: main: fun
, } --- handle value 1 with (0 == 1)<2>(0,1,) ---> { stack: main{false<-1> :: if ((0 == 1)) ... else <0> :: return 0;<-1>} :: top{} heap: fun
, env: main: fun
, } --- handle value false with if ((0 == 1)) ... else <1>(false,) ---> { stack: main{<-1> :: return 0;<-1>} :: top{} heap: fun
, env: main: fun
, } --- step stmt --->