@@ -4,7 +4,7 @@ import gleam/string
44pub type OperatorVariant ( prec) {
55 OParen
66 Asterix ( prec)
7- Plus ( prec)
7+ Bar ( prec)
88 QMark ( prec)
99}
1010
@@ -21,7 +21,7 @@ fn tokenize(input: List(String), tokens: List(Token)) -> List(Token) {
2121 let tok = case char {
2222 "*" -> Operator ( Asterix ( 3 ) )
2323 "?" -> Operator ( QMark ( 2 ) )
24- "+ " -> Operator ( Plus ( 1 ) )
24+ "| " -> Operator ( Bar ( 1 ) )
2525 "(" -> Operator ( OParen )
2626 ")" -> CParen
2727 _ -> Letter ( char )
@@ -42,7 +42,7 @@ pub fn to_string(tokens: List(Token), output: String) -> String {
4242 case variant {
4343 OParen -> to_string ( rest , string . append ( output , "(" ) )
4444 Asterix ( _ ) -> to_string ( rest , string . append ( output , "*" ) )
45- Plus ( _ ) -> to_string ( rest , string . append ( output , "+" ) )
45+ Bar ( _ ) -> to_string ( rest , string . append ( output , "+" ) )
4646 QMark ( _ ) -> to_string ( rest , string . append ( output , "?" ) )
4747 }
4848 }
@@ -85,7 +85,7 @@ fn shunt_loop(
8585 Operator ( opvar ) -> {
8686 case opvar {
8787 OParen -> shunt_loop ( rest , output , list . prepend ( stack , opvar ) )
88- Asterix ( p ) | Plus ( p ) | QMark ( p ) -> {
88+ Asterix ( p ) | Bar ( p ) | QMark ( p ) -> {
8989 let # ( o , s ) = handle_operator ( output , stack , opvar , p )
9090 shunt_loop ( rest , o , s )
9191 }
@@ -117,7 +117,7 @@ fn handle_operator(
117117 [ opvar , .. rest ] -> {
118118 case opvar {
119119 OParen -> # ( output , list . prepend ( stack , variant ) )
120- Asterix ( p ) | Plus ( p ) | QMark ( p ) -> {
120+ Asterix ( p ) | Bar ( p ) | QMark ( p ) -> {
121121 case precedence > p {
122122 True -> {
123123 # ( output , list . prepend ( stack , variant ) )
0 commit comments