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