From: "Petteri Räty" <betelgeuse@gentoo.org>
To: gentoo-commits@lists.gentoo.org
Subject: [gentoo-commits] proj/libbash:master commit in: scripts/, bashast/
Date: Thu, 12 May 2011 14:06:53 +0000 (UTC) [thread overview]
Message-ID: <82268e958be9caee5d9e71d14d27d0d25fd36ee6.betelgeuse@gentoo> (raw)
commit: 82268e958be9caee5d9e71d14d27d0d25fd36ee6
Author: Mu Qiao <qiaomuf <AT> gentoo <DOT> org>
AuthorDate: Wed May 11 13:46:14 2011 +0000
Commit: Petteri Räty <betelgeuse <AT> gentoo <DOT> org>
CommitDate: Wed May 11 13:48:05 2011 +0000
URL: http://git.overlays.gentoo.org/gitweb/?p=proj/libbash.git;a=commit;h=82268e95
Walker: support character class in patterns
---
bashast/libbashWalker.g | 11 ++++++++++-
scripts/compound_command.bash | 18 ++++++++++++++++++
scripts/compound_command.bash.result | 5 ++++-
3 files changed, 32 insertions(+), 2 deletions(-)
diff --git a/bashast/libbashWalker.g b/bashast/libbashWalker.g
index 6c9e0c1..407c8b6 100644
--- a/bashast/libbashWalker.g
+++ b/bashast/libbashWalker.g
@@ -227,7 +227,16 @@ bash_pattern[boost::xpressive::sregex& pattern, bool greedy]
}
|(MATCH_ANY_EXCEPT|MATCH_ANY) =>
^((MATCH_ANY_EXCEPT { negation = true; } | MATCH_ANY { negation = false; })
- (s=string_part { pattern_str += s.libbash_value; })+) {
+ ((CHARACTER_CLASS) => ^(CHARACTER_CLASS n=NAME) {
+ std::string class_name = walker->get_string(n);
+ if(class_name == "word")
+ pattern_str += "A-Za-z0-9_";
+ else if(class_name == "ascii")
+ pattern_str += "\\x00-\\x7F";
+ else
+ pattern_str += "[:" + class_name + ":]";
+ }
+ |s=string_part { pattern_str += s.libbash_value; })+) {
if(negation)
pattern_str = "[^" + pattern_str + "]";
diff --git a/scripts/compound_command.bash b/scripts/compound_command.bash
index a75898f..daeef24 100644
--- a/scripts/compound_command.bash
+++ b/scripts/compound_command.bash
@@ -160,4 +160,22 @@ case $target in
echo yep
;;
esac
+target="a"
+case $target in
+ [[:alnum:][:alpha:][:ascii:][:blank:][:cntrl:][:digit:][:graph:][:lower:][:print:][:punct:][:space:][:upper:][:word:][:xdigit:]])
+ echo yep
+ ;;
+esac
+target="a"
+case $target in
+ [[:ascii:]])
+ echo yep
+ ;;
+esac
+target="_"
+case $target in
+ [[:word:]])
+ echo yep
+ ;;
+esac
echo "case end"
diff --git a/scripts/compound_command.bash.result b/scripts/compound_command.bash.result
index 255c8eb..2a23d0c 100644
--- a/scripts/compound_command.bash.result
+++ b/scripts/compound_command.bash.result
@@ -31,10 +31,13 @@ yep
yep
yep
yep
+yep
+yep
+yep
case end
a=1
b=2
file= foo bar
foo=ghi
i=4
-target=bar
+target=_
next reply other threads:[~2011-05-12 14:07 UTC|newest]
Thread overview: 66+ messages / expand[flat|nested] mbox.gz Atom feed top
2011-05-12 14:06 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-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-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=82268e958be9caee5d9e71d14d27d0d25fd36ee6.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