| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821 |
- MakeBlock
- ********** source program **********
- fn main () -> Int {
- var Int: x = 2;
- while (true)
- {
- if ((x == 0))
- break;
- else
- x = (x - 1);
- }
- return x;
- }
- ********** type checking **********
- --- step exp Int --->
- --- step exp Int --->
- --- step exp Int --->
- ********** type checking complete **********
- fn main () -> Int {
- var Int: x = 2;
- while (true)
- {
- if ((x == 0))
- break;
- else
- 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 Int: x = 2; ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step stmt var Int: x = 2; ... --->
- {
- stack: main{var Int: x = 2;<-1> :: while (true)
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step stmt var Int: x = 2; --->
- {
- stack: main{2<-1> :: var Int: x = 2;<0> :: while (true)
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step exp 2 --->
- {
- stack: main{2<-1> :: var Int: x = 2;<0> :: while (true)
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- handle value 2 with var Int: x = 2;<1>(2,) --->
- {
- stack: main{Int: x<-1> :: var Int: x = 2;<1>(2,) :: while (true)
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step exp Int: x --->
- {
- stack: main{Int<-1> :: Int: x<0> :: var Int: x = 2;<1>(2,) :: while (true)
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- step exp Int --->
- {
- stack: main{Int<-1> :: Int: x<0> :: var Int: x = 2;<1>(2,) :: while (true)
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- handle value Int with Int: x<1>(Int,) --->
- {
- stack: main{Int: x<-1> :: var Int: x = 2;<1>(2,) :: while (true)
- ... ... <-1>} :: top{}
- heap: fun<main>,
- env: main: fun<main>,
- }
- --- handle value Int: x with var Int: x = 2;<2>(2,Int: x,) --->
- pattern_match(Int: x, 2)
- {
- stack: main{while (true)
- ... ... <-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step stmt while (true)
- ... ... --->
- {
- stack: main{while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step stmt while (true)
- ... --->
- {
- stack: main{true<-1> :: while (true)
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step exp true --->
- {
- stack: main{true<-1> :: while (true)
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- handle value true with while (true)
- ... <1>(true,) --->
- {
- stack: main{{
- ...
- }
- <-1> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step stmt {
- ...
- }
- --->
- {
- stack: main{if ((x == 0))
- ...
- else
- ... <-1> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step stmt if ((x == 0))
- ...
- else
- ... --->
- {
- stack: main{if ((x == 0))
- ...
- else
- ... <-1> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step stmt if ((x == 0))
- ...
- else
- ... --->
- {
- stack: main{(x == 0)<-1> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- step exp x --->
- {
- stack: main{2<-1> :: (x == 0)<0> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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,) :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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,) :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 2,
- env: x: 2, main: fun<main>,
- }
- --- handle value false with if ((x == 0))
- ...
- else
- ... <1>(false,) --->
- {
- stack: main{x = (x - 1);<-1> :: {
- ...
- }
- <0> :: while (true)
- ... <-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> :: {
- ...
- }
- <0> :: while (true)
- ... <-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> :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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{{
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt {
- ...
- }
- --->
- {
- stack: main{while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt while (true)
- ... --->
- {
- stack: main{true<-1> :: while (true)
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step exp true --->
- {
- stack: main{true<-1> :: while (true)
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- handle value true with while (true)
- ... <1>(true,) --->
- {
- stack: main{{
- ...
- }
- <-1> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt {
- ...
- }
- --->
- {
- stack: main{if ((x == 0))
- ...
- else
- ... <-1> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt if ((x == 0))
- ...
- else
- ... --->
- {
- stack: main{if ((x == 0))
- ...
- else
- ... <-1> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step stmt if ((x == 0))
- ...
- else
- ... --->
- {
- stack: main{(x == 0)<-1> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- step exp x --->
- {
- stack: main{1<-1> :: (x == 0)<0> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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,) :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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,) :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 1,
- env: x: 1, main: fun<main>,
- }
- --- handle value false with if ((x == 0))
- ...
- else
- ... <1>(false,) --->
- {
- stack: main{x = (x - 1);<-1> :: {
- ...
- }
- <0> :: while (true)
- ... <-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> :: {
- ...
- }
- <0> :: while (true)
- ... <-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> :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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>,) :: {
- ...
- }
- <0> :: while (true)
- ... <-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{{
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step stmt {
- ...
- }
- --->
- {
- stack: main{while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step stmt while (true)
- ... --->
- {
- stack: main{true<-1> :: while (true)
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step exp true --->
- {
- stack: main{true<-1> :: while (true)
- ... <0> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- handle value true with while (true)
- ... <1>(true,) --->
- {
- stack: main{{
- ...
- }
- <-1> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step stmt {
- ...
- }
- --->
- {
- stack: main{if ((x == 0))
- ...
- else
- ... <-1> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step stmt if ((x == 0))
- ...
- else
- ... --->
- {
- stack: main{if ((x == 0))
- ...
- else
- ... <-1> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step stmt if ((x == 0))
- ...
- else
- ... --->
- {
- stack: main{(x == 0)<-1> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step exp x --->
- {
- stack: main{0<-1> :: (x == 0)<0> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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,) :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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,) :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: 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> :: if ((x == 0))
- ...
- else
- ... <0> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- handle value true with if ((x == 0))
- ...
- else
- ... <1>(true,) --->
- {
- stack: main{break;<-1> :: {
- ...
- }
- <0> :: while (true)
- ... <-1> :: return x;<-1>} :: top{}
- heap: fun<main>, 0,
- env: x: 0, main: fun<main>,
- }
- --- step stmt break; --->
- {
- 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
|