Map

src/lib.rs

@@ -1,9 +1,11 @@
 #![allow(dead_code)] //TODO eventually turn this off
 mod choice;
+mod map;
 mod primitives;
 mod sequence;
 
 pub use choice::*;
+pub use map::*;
 pub use primitives::*;
 pub use sequence::*;
 
@@ -53,4 +55,14 @@ mod tests {
         let output = parser.parse("ara hajimete").unwrap();
         assert_eq!(("ara", " hajimete"), output);
     }
+
+    #[test]
+    fn test_map() {
+        let parser = map(
+            sequence(literal("a"), literal("b")),
+            |(_a, _b): (&str, &str)| 59,
+        );
+        let output = parser.parse("abcd").unwrap();
+        assert_eq!((59, "cd"), output);
+    }
 }