dhil/phd-dissertation
1
0
Fork 0
mirror of https://github.com/dhil/phd-dissertation synced 2026-03-13 11:08:25 +00:00
Code Issues Releases Wiki Activity

Generic state handling code.

Browse Source
This commit is contained in:
Daniel Hillerström
2020-10-02 16:26:29 +01:00
parent 5f0faa13c8
commit 92aed1134a
2 changed files with 26 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
macros.tex
View File

@@ -368,3 +368,5 @@
\newcommand{\timeshare}{\dec{timeshare}} \newcommand{\timeshare}{\dec{timeshare}}
\newcommand{\runNext}{\dec{runNext}} \newcommand{\runNext}{\dec{runNext}}
\newcommand{\concatMap}{\dec{concatMap}} \newcommand{\concatMap}{\dec{concatMap}}
\newcommand{\State}{\dec{State}}
\newcommand{\runState}{\dec{runState}}

24
thesis.tex
View File

@@ -959,7 +959,7 @@ computation to syntactically \emph{appear in tail position}.
position, then both $M$ and $N$ appear in tail positions. position, then both $M$ and $N$ appear in tail positions.
\item If $\Let\;\Record{\ell = x; y} = V \;\In\;N$ appears in tail \item If $\Let\;\Record{\ell = x; y} = V \;\In\;N$ appears in tail
position, then $N$ is in tail position. position, then $N$ is in tail position.
\item If $\Let\;x \revto M\;\In\;N$ appear in tail position, then \item If $\Let\;x \revto M\;\In\;N$ appears in tail position, then
$N$ appear in tail position. $N$ appear in tail position.
\item Nothing else appears in tail position. \item Nothing else appears in tail position.
\end{itemize} \end{itemize}
@@ -2366,6 +2366,28 @@ string.
\subsection{State: file i/o} \subsection{State: file i/o}
\label{sec:tiny-unix-io} \label{sec:tiny-unix-io}
\[
\State~\alpha \defas \{\Get:\UnitType \opto \alpha;\Put:\alpha \opto \UnitType\}
\]
\[
\bl
\runState : \Record{\beta;\UnitType \to \alpha \eff \State~\beta} \to \Record{\alpha;\beta}\\
\runState~\Record{st_0;m} \defas
\ba[t]{@{}l}
\Let\;f \revto
\ba[t]{@{}l}
\Handle\;m\,\Unit\;\With\\
~\ba{@{~}l@{~}c@{~}l}
\Return\;res &\mapsto& \lambda st.\Record{res;st}\\
\Get~\Unit~resume &\mapsto& \lambda st.resume~st~st\\
\Put~st'~resume &\mapsto& \lambda st.resume~\Unit~st'
\ea
\ea\\
\In\; f\,st_0
\ea
\el
\]
% The existing literature already contain an extensive amount of % The existing literature already contain an extensive amount of
% introductory examples of programming with (deep) effect % introductory examples of programming with (deep) effect