doch kein enum

master
Denis Knauf 2011-01-21 15:37:37 +01:00
parent 8b62691da5
commit 165df46ca7
2 changed files with 3 additions and 3 deletions

View File

@ -235,7 +235,7 @@ variable enumerationCount ( -- addr )
2 cursor> 0 u.r ." ." space
5 ptype-curx ! 0
;
: <||> ( -- , xt-{||} ) block? <> throw ['] {||} , ;
: <||> ( -- , xt-{||} ) block? ['] {||} , ;
: {/||} ( -- ) cr ;
: </||> ( -- , xt-{/||} ) ['] {/||} , block? ;

View File

@ -174,14 +174,14 @@
<p> farbendemo </p>
<np>
<h> !" Beliebige Wörter können Inhalte erzeugen!!" </h>
<p> <b> !" So kann man Aufzaehlungen erstellen" </b> </p>
( <p> <b> !" So kann man Aufzaehlungen erstellen" </b> </p>
<p>
<en>
<||> !" Das erstellen von Präsentationen und Formatierungen wirkt natürlich" </||>
<||> !" Unsere Sprache erbt die gesamte Funktionalität von Forth persönlich." </||>
<||> !" Makros generieren Inhalte" </||>
</en>
</p>
</p> )
<p> s" presentation.p.fs" 112 116 <source> </p>
<p> !" Die Operatoren sehen so aus:" </p>
<p> s" presentation.fs" 214 221 <source> </p>