@@ -26,9 +26,9 @@ object GenParser extends RegexParsers with PackratParsers {
26
26
}
27
27
28
28
// quantifiers
29
- val optional = expression0 <~ " ?" ^^ { splitLiteral(_, Optional ) }
30
- val oneOrMore = expression0 <~ " +" ^^ { splitLiteral(_, OneOrMore ) }
31
- val zeroOrMore = expression0 <~ " *" ^^ { splitLiteral(_, ZeroOrMore ) }
29
+ val optional = expression0 <~ " ?" ^^ { splitLiteral(_, Optional .apply ) }
30
+ val oneOrMore = expression0 <~ " +" ^^ { splitLiteral(_, OneOrMore .apply ) }
31
+ val zeroOrMore = expression0 <~ " *" ^^ { splitLiteral(_, ZeroOrMore .apply ) }
32
32
33
33
val rangeFrom = expression0 ~ (" {" ~> int <~ " ,}" ) ^^ {
34
34
case expr ~ min =>
@@ -58,8 +58,8 @@ object GenParser extends RegexParsers with PackratParsers {
58
58
59
59
lazy val group : PackratParser [RegularExpression ] = {
60
60
61
- lazy val nonCapturingGroup = " (?:" ~> expression <~ " )" ^^ NonCapturingGroup
62
- lazy val capturingGroup = " (" ~> expression <~ " )" ^^ Group
61
+ lazy val nonCapturingGroup = " (?:" ~> expression <~ " )" ^^ NonCapturingGroup .apply
62
+ lazy val capturingGroup = " (" ~> expression <~ " )" ^^ Group .apply
63
63
64
64
capturingGroup | nonCapturingGroup
65
65
}
@@ -77,15 +77,15 @@ object GenParser extends RegexParsers with PackratParsers {
77
77
}
78
78
79
79
lazy val lowerAlphaRange : Parser [CharacterClass .Term ] = {
80
- val c = " [a-z]" .r ^^ { _.apply (0 ) }
80
+ val c = " [a-z]" .r ^^ { _.charAt (0 ) }
81
81
c ~ (" -" ~> c) ^^ {
82
82
case min ~ max =>
83
83
CharacterClass .CharRange (min, max)
84
84
}
85
85
}
86
86
87
87
lazy val upperAlphaRange : Parser [CharacterClass .Term ] = {
88
- val c = " [A-Z]" .r ^^ { _.apply (0 ) }
88
+ val c = " [A-Z]" .r ^^ { _.charAt (0 ) }
89
89
c ~ (" -" ~> c) ^^ {
90
90
case min ~ max =>
91
91
CharacterClass .CharRange (min, max)
@@ -100,7 +100,7 @@ object GenParser extends RegexParsers with PackratParsers {
100
100
lazy val char : Parser [CharacterClass .Term ] = {
101
101
val normalChars = " [^\\ ]\\\\ ]" .r
102
102
val meta = " \\ " | " ]" | " -"
103
- ((" \\ " ~> meta) | normalChars | " \\ " ~> normalChars) ^^ CharacterClass .Literal
103
+ ((" \\ " ~> meta) | normalChars | " \\ " ~> normalChars) ^^ CharacterClass .Literal .apply
104
104
}
105
105
106
106
lazy val characterClassTerm : Parser [CharacterClass .Term ] =
0 commit comments