Loading appendixb.tex +4 −4 Original line number Diff line number Diff line Loading @@ -36,12 +36,12 @@ Here's an illustration of the dictionary entry created when we enter {\sf \bigskip \begin{tabular}{@{} l l@{}} DOER JOE & \\ \begin{tabular}{|l|l|} \multicolumn{1}{l}{DOER JOE} & \multicolumn{1}{l}{}\\ \hline \vline\ JOE & \vline\ pfa of NOTHING \vline \\ JOE & pfa of NOTHING \\ \hline \ header &\ parameter field \multicolumn{1}{l}{header} & \multicolumn{1}{l}{parameter field} \end{tabular} \bigskip } Loading chapter6.tex +3 −3 Original line number Diff line number Diff line Loading @@ -1163,7 +1163,7 @@ repeated code into the ``does'' part of a defining word: \begin{Code} : Port ( offset -- ) Create , \ DOES> ( -- 'port) @ base.port.address + ; DOES> ( -- 'port) @ base.port.address + ; 0 Port speaker 2 Port flipper-a 4 Port flipper-b Loading Loading @@ -1199,7 +1199,7 @@ makes a constant out of it, then adds 2 to the address still on the stack, for the next invocation of \forth{PORT}. \begin{Code} : Port ( 'port -- 'next-port) dup Create , 2+ ; : Port ( 'port -- 'next-port) dup Constant 2 + ; \ DOES> ( -- 'port) base.port.address Port speaker Loading Loading
appendixb.tex +4 −4 Original line number Diff line number Diff line Loading @@ -36,12 +36,12 @@ Here's an illustration of the dictionary entry created when we enter {\sf \bigskip \begin{tabular}{@{} l l@{}} DOER JOE & \\ \begin{tabular}{|l|l|} \multicolumn{1}{l}{DOER JOE} & \multicolumn{1}{l}{}\\ \hline \vline\ JOE & \vline\ pfa of NOTHING \vline \\ JOE & pfa of NOTHING \\ \hline \ header &\ parameter field \multicolumn{1}{l}{header} & \multicolumn{1}{l}{parameter field} \end{tabular} \bigskip } Loading
chapter6.tex +3 −3 Original line number Diff line number Diff line Loading @@ -1163,7 +1163,7 @@ repeated code into the ``does'' part of a defining word: \begin{Code} : Port ( offset -- ) Create , \ DOES> ( -- 'port) @ base.port.address + ; DOES> ( -- 'port) @ base.port.address + ; 0 Port speaker 2 Port flipper-a 4 Port flipper-b Loading Loading @@ -1199,7 +1199,7 @@ makes a constant out of it, then adds 2 to the address still on the stack, for the next invocation of \forth{PORT}. \begin{Code} : Port ( 'port -- 'next-port) dup Create , 2+ ; : Port ( 'port -- 'next-port) dup Constant 2 + ; \ DOES> ( -- 'port) base.port.address Port speaker Loading