From 165df46ca72b41bb8be525aab3eacaee82e15efa Mon Sep 17 00:00:00 2001
From: Denis Knauf
Date: Fri, 21 Jan 2011 15:37:37 +0100
Subject: [PATCH] doch kein enum
---
presentation.fs | 2 +-
presentation.p.fs | 4 ++--
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/presentation.fs b/presentation.fs
index ac2dab7..2f71565 100755
--- a/presentation.fs
+++ b/presentation.fs
@@ -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? ;
diff --git a/presentation.p.fs b/presentation.p.fs
index d9218bc..4a8fbbf 100644
--- a/presentation.p.fs
+++ b/presentation.p.fs
@@ -174,14 +174,14 @@
farbendemo
!" Beliebige Wörter können Inhalte erzeugen!!"
- !" So kann man Aufzaehlungen erstellen"
+ ( !" So kann man Aufzaehlungen erstellen"
<||> !" Das erstellen von Präsentationen und Formatierungen wirkt natürlich" ||>
<||> !" Unsere Sprache erbt die gesamte Funktionalität von Forth persönlich." ||>
<||> !" Makros generieren Inhalte" ||>
-
+
)
s" presentation.p.fs" 112 116
!" Die Operatoren sehen so aus:"
s" presentation.fs" 214 221