From 4029ddcd1bf0da391fb26b7e717fe015bafb0fb9 Mon Sep 17 00:00:00 2001
From: Walter Bender <walter.bender@gmail.com>
Date: Thu, 05 Jul 2012 13:28:47 +0000
Subject: convert flow blocks to new clamp style

---
(limited to 'TurtleArt/taconstants.py')

diff --git a/TurtleArt/taconstants.py b/TurtleArt/taconstants.py
index 0285f7b..e246b03 100644
--- a/TurtleArt/taconstants.py
+++ b/TurtleArt/taconstants.py
@@ -90,6 +90,9 @@ EXPANDABLE_STYLE = ['boolean-style', 'compare-porch-style', 'compare-style',
                     'number-style-porch', 'number-style', 'basic-style-2arg',
                     'number-style-block', 'box-style-media']
 
+# Fixme: this should be based on styles
+EXPANDABLE_FLOW = ['repeat', 'until', 'while', 'if', 'forever', 'ifelse']
+
 EXPANDABLE = ['vspace', 'hspace', 'identity2']
 
 EXPANDABLE_ARGS = ['list', 'myfunc1arg', 'myfunc2arg', 'myfunc3arg',
@@ -218,6 +221,8 @@ VOICES = {'af': 'afrikaans', 'cy': 'welsh-test', 'el': 'greek',
 # Macros (groups of blocks)
 #
 MACROS = {
+    'ifthenelse':
+              [[0, 'ifelse', 0, 0, [None, None, None, None]]],
     'clamp':
               [[0, 'sandwichtop_no_label', 0, 0, [None, 1]],
                [1, 'vspace', 0, 0, [0, 2]],
--
cgit v0.9.1