From db400c28dceb98799da739196ce156d0807f9ad4 Mon Sep 17 00:00:00 2001
From: Louis <louis@rubet.fr>
Date: Tue, 24 Feb 2015 16:43:17 +0100
Subject: [PATCH] Recursive programs entry

---
 src/parse.h | 54 +++++++++++++++++++++++++++++++++++++++++++----------
 1 file changed, 44 insertions(+), 10 deletions(-)

diff --git a/src/parse.h b/src/parse.h
index 14c08fd..1b7f02c 100644
--- a/src/parse.h
+++ b/src/parse.h
@@ -54,26 +54,60 @@ static bool _cut(const string& entry, vector<string>& entries)
                     entries.push_back(tmp);
                     tmp.clear();
                 }
-                if (i<(entry.size()-1) && entry.at(i+1)=='<')
+
+                if (entry.substr(i, 2) == "<<")
                 {
-                    //get expression
+                    int up = 1;
+
+                    // found a program begin
                     i+=2;
-                    tmp = "<<";
+                    tmp="<< ";
                     // trim leading spaces
                     while (i<entry.size() && (entry.at(i)==' ' || entry.at(i)=='\t'))
-                        i++;                    
-                    //get the rest
+                        i++;
+
                     while(i<entry.size())
                     {
-                        tmp+=entry.at(i);
-                        i++;
+                        if (entry.substr(i, 2) == "<<")
+                        {
+                            up++;
+                            i+=2;
+                            tmp+=" << ";
+                            // trim leading spaces
+                            while (i<entry.size() && (entry.at(i)==' ' || entry.at(i)=='\t'))
+                                i++;
+                        }
+                        else if (entry.substr(i, 2) == ">>")
+                        {
+                            up--;
+                            i+=2;
+                            tmp+=" >>";
+                            // trim trailing spaces
+                            while (i<entry.size() && (entry.at(i)==' ' || entry.at(i)=='\t'))
+                                i++;
+                            // found end
+                            if (up == 0)
+                                break;
+                        }
+                        else
+                        {
+                            tmp+=entry[i];
+                            i++;
+                        }
+                    }
+                    while((up--)>0)
+                    {
+                        tmp += " >>";
+                    }
+                    if (tmp.size()>0)
+                    {
+                        entries.push_back(tmp);
+                        tmp.clear();
                     }
-                    entries.push_back(tmp);
-                    tmp.clear();
                 }
                 else
                 {
-                    // reinject < which is not a program begin
+                    // reinject '<'' which is not a prog begin
                     tmp = "<";
                 }
                 break;