public inbox for gentoo-commits@lists.gentoo.org
 help / color / mirror / Atom feed
From: "Petteri Räty" <betelgeuse@gentoo.org>
To: gentoo-commits@lists.gentoo.org
Subject: [gentoo-commits] proj/libbash:master commit in: scripts/, bashast/
Date: Sat, 25 Jun 2011 10:05:50 +0000 (UTC)	[thread overview]
Message-ID: <4a6aa796319c9dbc9ac1b50c846c6f4b009c196f.betelgeuse@gentoo> (raw)

commit:     4a6aa796319c9dbc9ac1b50c846c6f4b009c196f
Author:     Mu Qiao <qiaomuf <AT> gentoo <DOT> org>
AuthorDate: Mon Jun 20 14:48:22 2011 +0000
Commit:     Petteri Räty <betelgeuse <AT> gentoo <DOT> org>
CommitDate: Thu Jun 23 03:24:43 2011 +0000
URL:        http://git.overlays.gentoo.org/gitweb/?p=proj/libbash.git;a=commit;h=4a6aa796

Walker: support break built-in

---
 bashast/libbashWalker.g              |   24 ++++++++++-
 scripts/compound_command.bash        |   79 ++++++++++++++++++++++++++++++++++
 scripts/compound_command.bash.result |    9 ++--
 3 files changed, 107 insertions(+), 5 deletions(-)

diff --git a/bashast/libbashWalker.g b/bashast/libbashWalker.g
index 02e2f33..2bd446d 100644
--- a/bashast/libbashWalker.g
+++ b/bashast/libbashWalker.g
@@ -719,6 +719,12 @@ for_expr
 					{
 						e.rethrow_unless_correct_frame();
 					}
+					catch(break_exception& e)
+					{
+						e.rethrow_unless_correct_frame();
+						SEEK(commands_index);
+						break;
+					}
 					SEEK(commands_index);
 				}
 				seek_to_next_tree(ctx);
@@ -743,8 +749,10 @@ for_expr
 
 		SEEK(condition_index);
 
+		ANTLR3_MARKER command_index;
 		while(!has_condition || for_condition(ctx))
 		{
+			command_index = INDEX();
 			try
 			{
 				command_list(ctx);
@@ -758,10 +766,15 @@ for_expr
 					SEEK(modification_index);
 					for_modification(ctx);
 				}
-
 				SEEK(condition_index);
 				continue;
 			}
+			catch(break_exception& e)
+			{
+				e.rethrow_unless_correct_frame();
+				SEEK(command_index);
+				break;
+			}
 			if(has_modification)
 				for_modification(ctx);
 			SEEK(condition_index);
@@ -789,6 +802,7 @@ for_modification
 while_expr
 @declarations {
 	ANTLR3_MARKER condition_index;
+	ANTLR3_MARKER command_index;
 	bool negate;
 }
 	:^((WHILE { negate = false; } | UNTIL { negate = true; }) {
@@ -801,6 +815,8 @@ while_expr
 			command_list(ctx);
 			if(walker->get_status() == (negate? 0 : 1))
 				break;
+
+			command_index = INDEX();
 			try
 			{
 				command_list(ctx);
@@ -811,6 +827,12 @@ while_expr
 				SEEK(condition_index);
 				continue;
 			}
+			catch(break_exception& e)
+			{
+				e.rethrow_unless_correct_frame();
+				SEEK(command_index);
+				break;
+			}
 			SEEK(condition_index);
 		}
 		// Skip the body and get out

diff --git a/scripts/compound_command.bash b/scripts/compound_command.bash
index 06b4f9e..ece5504 100644
--- a/scripts/compound_command.bash
+++ b/scripts/compound_command.bash
@@ -46,6 +46,22 @@ do
     echo $file
 done
 
+for file in foo bar
+do
+    if [[ $file == "foo" ]]; then
+        break
+    fi
+    echo $file
+done
+
+for file in foo bar
+do
+    if [[ $file == "bar" ]]; then
+        break
+    fi
+    echo $file
+done
+
 for outer in 1 2 3
 do
     for file in foo bar
@@ -57,6 +73,17 @@ do
     done
 done
 
+for outer in 1 2 3
+do
+    for file in foo bar
+    do
+        if [[ $file == "foo" && $outer == 1 ]]; then
+            break 2
+        fi
+        echo "$outer $file"
+    done
+done
+
 i=0;
 while [ $i != 4 ]
 do
@@ -80,6 +107,16 @@ do
 done
 
 i=0
+while [ $i != 4 ]
+do
+    i=$(( i + 1 ))
+    if [[ $i == 1 ]]; then
+        break
+    fi
+    echo $i
+done
+
+i=0
 j=1
 while [ $i != 4 ]
 do
@@ -95,6 +132,22 @@ do
     done
 done
 
+i=0
+j=1
+while [ $i != 4 ]
+do
+    i=$(( i + 1 ))
+    
+    while [ $j == 1 ]
+    do
+        if [[ $i == 1 ]]; then
+            break 2
+        fi
+        echo $i
+        let ++j
+    done
+done
+
 i=0;
 until [ $i == 4 ]
 do
@@ -118,6 +171,16 @@ do
 done
 
 i=0
+until [ $i == 4 ]
+do
+    i=$(( i + 1 ))
+    if [[ $i == 1 ]]; then
+        break
+    fi
+    echo $i
+done
+
+i=0
 j=1
 until [ $i == 4 ]
 do
@@ -133,6 +196,22 @@ do
     done
 done
 
+i=0
+j=1
+until [ $i == 4 ]
+do
+    i=$(( i + 1 ))
+    
+    while [ $j == 1 ]
+    do
+        if [[ $i == 1 ]]; then
+            break 2
+        fi
+        echo $i
+        let ++j
+    done
+done
+
 a=1
 b=2
 if [ $a == $b ]

diff --git a/scripts/compound_command.bash.result b/scripts/compound_command.bash.result
index 4662025..c083e6a 100644
--- a/scripts/compound_command.bash.result
+++ b/scripts/compound_command.bash.result
@@ -13,6 +13,7 @@ ghi
 10
 bar
 foo
+foo
 2 foo
 2 bar
 3 foo
@@ -52,9 +53,9 @@ case end
 a=1
 b=2
 bar=
-file=bar
+file=foo
 foo=ghi
-i=4
-j=2
-outer=3
+i=1
+j=1
+outer=1
 target=_



             reply	other threads:[~2011-06-25 10:06 UTC|newest]

Thread overview: 66+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2011-06-25 10:05 Petteri Räty [this message]
  -- strict thread matches above, loose matches on Subject: below --
2012-08-19 15:23 [gentoo-commits] proj/libbash:master commit in: scripts/, bashast/ Petteri Räty
2012-08-19 14:54 Petteri Räty
2012-08-19 14:54 Petteri Räty
2012-08-19 14:29 Petteri Räty
2012-08-07  2:38 Mu Qiao
2012-08-07  2:38 Mu Qiao
2012-08-07  2:38 Mu Qiao
2012-07-29 12:46 Petteri Räty
2012-07-29 12:45 Petteri Räty
2012-07-08  9:44 Petteri Räty
2012-07-08  9:31 Petteri Räty
2012-06-03  9:08 Petteri Räty
2012-06-03  9:08 Petteri Räty
2012-06-03  9:08 Petteri Räty
2012-06-03  9:08 Petteri Räty
2012-06-03  9:08 Petteri Räty
2012-06-03  9:08 Petteri Räty
2011-08-04 13:53 Petteri Räty
2011-08-04 13:53 Petteri Räty
2011-08-04 13:53 Petteri Räty
2011-08-04 13:53 Petteri Räty
2011-08-04 13:53 Petteri Räty
2011-08-04 13:53 Petteri Räty
2011-07-20 13:08 Petteri Räty
2011-06-25 10:30 Petteri Räty
2011-06-25 10:30 Petteri Räty
2011-06-25 10:30 Petteri Räty
2011-06-25 10:05 Petteri Räty
2011-06-19 19:15 Petteri Räty
2011-06-18  9:55 Petteri Räty
2011-06-16 16:53 Petteri Räty
2011-06-16 16:53 Petteri Räty
2011-06-11  8:52 Petteri Räty
2011-06-11  8:52 Petteri Räty
2011-06-09 11:46 Petteri Räty
2011-06-09  8:15 Petteri Räty
2011-06-09  7:27 Petteri Räty
2011-06-03 12:43 Petteri Räty
2011-06-01 12:19 Petteri Räty
2011-05-29 11:20 Petteri Räty
2011-05-29 11:20 Petteri Räty
2011-05-29 11:20 Petteri Räty
2011-05-28 13:11 Petteri Räty
2011-05-28 13:11 Petteri Räty
2011-05-24 14:50 Petteri Räty
2011-05-24 14:50 Petteri Räty
2011-05-24 14:50 Petteri Räty
2011-05-23 14:39 Petteri Räty
2011-05-22 21:00 Petteri Räty
2011-05-12 14:06 Petteri Räty
2011-05-12 14:06 Petteri Räty
2011-05-11  7:19 Petteri Räty
2011-05-11  7:19 Petteri Räty
2011-05-11  7:19 Petteri Räty
2011-05-11  7:19 Petteri Räty
2011-05-06 10:29 Petteri Räty
2011-04-27 15:11 Petteri Räty
2011-04-27 15:11 Petteri Räty
2011-04-20 14:04 Petteri Räty
2011-04-14  4:50 Petteri Räty
2011-04-12 18:29 Petteri Räty
2011-04-12 18:29 Petteri Räty
2011-04-04 16:09 Petteri Räty
2011-04-03 13:09 Petteri Räty
2011-04-03 10:16 Petteri Räty

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=4a6aa796319c9dbc9ac1b50c846c6f4b009c196f.betelgeuse@gentoo \
    --to=betelgeuse@gentoo.org \
    --cc=gentoo-commits@lists.gentoo.org \
    --cc=gentoo-dev@lists.gentoo.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox