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=_
next 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