| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616 |
- ********** source program **********
- fn main () -> Int {
- var auto: x = 2;
- while ((! (x == 0)))
- {
- x = (x - 1);
- continue;
- x = (x + 1);
- }
- return x;
- }
- ********** type checking **********
- --- step exp Int --->
- --- step exp Int --->
- --- step exp auto --->
- ********** type checking complete **********
- fn main () -> Int {
- var auto: x = 2;
- while ((! (x == 0)))
- {
- x = (x - 1);
- continue;
- x = (x + 1);
- }
- return x;
- }
- ********** starting execution **********
- ********** initializing globals **********
- --- step exp () --->
- ********** calling main function **********
- {
- stack: top{main()<-1>}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step exp main() --->
- {
- stack: top{main<-1> :: main()<0>}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step exp main --->
- {
- stack: top{fun<main><-1> :: main()<0>}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- handle value fun<main> with main()<1>(fun<main>,) --->
- {
- stack: top{()<-1> :: main()<1>(fun<main>,)}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step exp () --->
- {
- stack: top{()<-1> :: main()<1>(fun<main>,)}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- handle value () with main()<2>(fun<main>,(),) --->
- pattern_match((), ())
- {
- stack: main{var auto: x = 2; ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step stmt var auto: x = 2; ... --->
- {
- stack: main{var auto: x = 2;<-1> :: while ((! (x == 0)))
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step stmt var auto: x = 2; --->
- {
- stack: main{2<-1> :: var auto: x = 2;<0> :: while ((! (x == 0)))
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step exp 2 --->
- {
- stack: main{2<-1> :: var auto: x = 2;<0> :: while ((! (x == 0)))
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- handle value 2 with var auto: x = 2;<1>(2,) --->
- {
- stack: main{auto: x<-1> :: var auto: x = 2;<1>(2,) :: while ((! (x == 0)))
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step exp auto: x --->
- {
- stack: main{auto<-1> :: auto: x<0> :: var auto: x = 2;<1>(2,) :: while ((! (x == 0)))
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step exp auto --->
- {
- stack: main{auto<-1> :: auto: x<0> :: var auto: x = 2;<1>(2,) :: while ((! (x == 0)))
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- handle value auto with auto: x<1>(auto,) --->
- {
- stack: main{auto: x<-1> :: var auto: x = 2;<1>(2,) :: while ((! (x == 0)))
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- handle value auto: x with var auto: x = 2;<2>(2,auto: x,) --->
- pattern_match(auto: x, 2)
- {
- stack: main{while ((! (x == 0)))
- ... ... <-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step stmt while ((! (x == 0)))
- ... ... --->
- {
- stack: main{while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step stmt while ((! (x == 0)))
- ... --->
- {
- stack: main{(! (x == 0))<-1> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step exp (! (x == 0)) --->
- {
- stack: main{(x == 0)<-1> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step exp (x == 0) --->
- {
- stack: main{x<-1> :: (x == 0)<0> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step exp x --->
- {
- stack: main{2<-1> :: (x == 0)<0> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- handle value 2 with (x == 0)<1>(2,) --->
- {
- stack: main{0<-1> :: (x == 0)<1>(2,) :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step exp 0 --->
- {
- stack: main{0<-1> :: (x == 0)<1>(2,) :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- handle value 0 with (x == 0)<2>(2,0,) --->
- {
- stack: main{false<-1> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- handle value false with (! (x == 0))<1>(false,) --->
- {
- stack: main{true<-1> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- handle value true with while ((! (x == 0)))
- ... <1>(true,) --->
- {
- stack: main{{
- ...
- }
- <-1> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step stmt {
- ...
- }
- --->
- {
- stack: main{x = (x - 1); ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step stmt x = (x - 1); ... --->
- {
- stack: main{x = (x - 1);<-1> :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step stmt x = (x - 1); --->
- {
- stack: main{x<-1> :: x = (x - 1);<0> :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step lvalue x --->
- {
- stack: main{ptr<1><-1> :: x = (x - 1);<0> :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- handle value ptr<1> with x = (x - 1);<1>(ptr<1>,) --->
- {
- stack: main{(x - 1)<-1> :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step exp (x - 1) --->
- {
- stack: main{x<-1> :: (x - 1)<0> :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step exp x --->
- {
- stack: main{2<-1> :: (x - 1)<0> :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- handle value 2 with (x - 1)<1>(2,) --->
- {
- stack: main{1<-1> :: (x - 1)<1>(2,) :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step exp 1 --->
- {
- stack: main{1<-1> :: (x - 1)<1>(2,) :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- handle value 1 with (x - 1)<2>(2,1,) --->
- {
- stack: main{1<-1> :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- handle value 1 with x = (x - 1);<2>(ptr<1>,1,) --->
- {
- stack: main{continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt continue; ... --->
- {
- stack: main{continue;<-1> :: x = (x + 1);<-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt continue; --->
- {
- stack: main{while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt while ((! (x == 0)))
- ... --->
- {
- stack: main{(! (x == 0))<-1> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step exp (! (x == 0)) --->
- {
- stack: main{(x == 0)<-1> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step exp (x == 0) --->
- {
- stack: main{x<-1> :: (x == 0)<0> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step exp x --->
- {
- stack: main{1<-1> :: (x == 0)<0> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- handle value 1 with (x == 0)<1>(1,) --->
- {
- stack: main{0<-1> :: (x == 0)<1>(1,) :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step exp 0 --->
- {
- stack: main{0<-1> :: (x == 0)<1>(1,) :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- handle value 0 with (x == 0)<2>(1,0,) --->
- {
- stack: main{false<-1> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- handle value false with (! (x == 0))<1>(false,) --->
- {
- stack: main{true<-1> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- handle value true with while ((! (x == 0)))
- ... <1>(true,) --->
- {
- stack: main{{
- ...
- }
- <-1> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt {
- ...
- }
- --->
- {
- stack: main{x = (x - 1); ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt x = (x - 1); ... --->
- {
- stack: main{x = (x - 1);<-1> :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt x = (x - 1); --->
- {
- stack: main{x<-1> :: x = (x - 1);<0> :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step lvalue x --->
- {
- stack: main{ptr<1><-1> :: x = (x - 1);<0> :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- handle value ptr<1> with x = (x - 1);<1>(ptr<1>,) --->
- {
- stack: main{(x - 1)<-1> :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step exp (x - 1) --->
- {
- stack: main{x<-1> :: (x - 1)<0> :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step exp x --->
- {
- stack: main{1<-1> :: (x - 1)<0> :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- handle value 1 with (x - 1)<1>(1,) --->
- {
- stack: main{1<-1> :: (x - 1)<1>(1,) :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step exp 1 --->
- {
- stack: main{1<-1> :: (x - 1)<1>(1,) :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- handle value 1 with (x - 1)<2>(1,1,) --->
- {
- stack: main{0<-1> :: x = (x - 1);<1>(ptr<1>,) :: continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- handle value 0 with x = (x - 1);<2>(ptr<1>,0,) --->
- {
- stack: main{continue; ... <-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step stmt continue; ... --->
- {
- stack: main{continue;<-1> :: x = (x + 1);<-1> :: {
- ...
- }
- <0> :: while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step stmt continue; --->
- {
- stack: main{while ((! (x == 0)))
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step stmt while ((! (x == 0)))
- ... --->
- {
- stack: main{(! (x == 0))<-1> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step exp (! (x == 0)) --->
- {
- stack: main{(x == 0)<-1> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step exp (x == 0) --->
- {
- stack: main{x<-1> :: (x == 0)<0> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step exp x --->
- {
- stack: main{0<-1> :: (x == 0)<0> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- handle value 0 with (x == 0)<1>(0,) --->
- {
- stack: main{0<-1> :: (x == 0)<1>(0,) :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step exp 0 --->
- {
- stack: main{0<-1> :: (x == 0)<1>(0,) :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- handle value 0 with (x == 0)<2>(0,0,) --->
- {
- stack: main{true<-1> :: (! (x == 0))<0> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- handle value true with (! (x == 0))<1>(true,) --->
- {
- stack: main{false<-1> :: while ((! (x == 0)))
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- handle value false with while ((! (x == 0)))
- ... <1>(false,) --->
- {
- stack: main{return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step stmt return x; --->
- {
- stack: main{x<-1> :: return x;<0>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step exp x --->
- {
- stack: main{0<-1> :: return x;<0>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- handle value 0 with return x;<1>(0,) --->
- {
- stack: top{0<-1>}
- heap: fun<main>, !!0,
- env: main: fun<main>,
- }
- result: 0
|