diff --git a/presentation.fs b/presentation.fs
index d7bb42d..ac2dab7 100755
--- a/presentation.fs
+++ b/presentation.fs
@@ -233,20 +233,20 @@ variable enumerationCount ( -- addr )
: {||} ( addr -- addr ) \ increments enumeration count and prints prefix
enumerationCount dup @ 1+ dup rot !
2 cursor> 0 u.r ." ." space
- 5 ptype-curx !
+ 5 ptype-curx ! 0
;
-: <||> ( -- , xt-{||} ) [char] e ok- @ <> throw ['] {||} , ;
+: <||> ( -- , xt-{||} ) block? <> throw ['] {||} , ;
: {/||} ( -- ) cr ;
-: ||> ( -- , xt-{/||} ) ['] {/||} , ; \ [char] e ok- @ 2dup emit emit <> throw ;
+: ||> ( -- , xt-{/||} ) ['] {/||} , block? ;
: {en} ( -- )
cr
5 ptype-indent ! \ 6 Zeichen weit einruecken
0 enumerationCount ! \ resets enumeration count
;
-:
farbendemo
!" So kann man Aufzaehlungen erstellen"
-!" So kann man Aufzaehlungen erstellen"
+
+
s" presentation.p.fs" 112 116
!" Die Operatoren sehen so aus:"
s" presentation.fs" 214 221