[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 2cce1e3 37/60: Rename parsec-from-just to parsec-from-mayb
From: |
Junpeng Qiu |
Subject: |
[elpa] master 2cce1e3 37/60: Rename parsec-from-just to parsec-from-maybe |
Date: |
Tue, 25 Oct 2016 17:45:15 +0000 (UTC) |
branch: master
commit 2cce1e3b8e8ba33d83dc8570b4ec587607a76213
Author: Junpeng Qiu <address@hidden>
Commit: Junpeng Qiu <address@hidden>
Rename parsec-from-just to parsec-from-maybe
---
parsec-tests.el | 4 ++--
parsec.el | 2 +-
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/parsec-tests.el b/parsec-tests.el
index 471957f..661411f 100644
--- a/parsec-tests.el
+++ b/parsec-tests.el
@@ -427,7 +427,7 @@
(parsec-with-input "abcdef"
(parsec-collect-as-string
(parsec-str "abc")
- (parsec-from-just (parsec-optional-maybe (parsec-ch ?-)))
+ (parsec-from-maybe (parsec-optional-maybe (parsec-ch ?-)))
(parsec-str "def")))
"abcdef"))
(should
@@ -435,7 +435,7 @@
(parsec-with-input "abc-def"
(parsec-collect-as-string
(parsec-str "abc")
- (parsec-from-just (parsec-optional-maybe (parsec-ch ?-)))
+ (parsec-from-maybe (parsec-optional-maybe (parsec-ch ?-)))
(parsec-str "def")))
"abc-def")))
diff --git a/parsec.el b/parsec.el
index 00073f6..295aea8 100644
--- a/parsec.el
+++ b/parsec.el
@@ -495,7 +495,7 @@ The args can be in the following forms:
(consp x)
(eq (car x) 'Just))))
-(defun parsec-from-just (x)
+(defun parsec-from-maybe (x)
"Retrieve the value from Maybe monad X.
If X is `(Just . p)', return p. Otherwise return nil."
(and (consp x)
- [elpa] master bc11325 50/60: Add file examples/.nosearch, (continued)
- [elpa] master bc11325 50/60: Add file examples/.nosearch, Junpeng Qiu, 2016/10/25
- [elpa] master 1da4344 32/60: Update url-str-parser, Junpeng Qiu, 2016/10/25
- [elpa] master 89dd2ac 54/60: Fix some wording in README, Junpeng Qiu, 2016/10/25
- [elpa] master 55515ca 48/60: Add missing dependencies, Junpeng Qiu, 2016/10/25
- [elpa] master 2e9f962 59/60: Add new package parsec to externals-list, Junpeng Qiu, 2016/10/25
- [elpa] master 3827d26 36/60: Add docs for user-interface functions & combinators, Junpeng Qiu, 2016/10/25
- [elpa] master 8c108be 56/60: Add parsec-peek and parsec-peek-p, Junpeng Qiu, 2016/10/25
- [elpa] master 6001a70 12/60: Refine and add more parsec API, Junpeng Qiu, 2016/10/25
- [elpa] master da878fa 18/60: Use parsec-query for other return values, Junpeng Qiu, 2016/10/25
- [elpa] master 054a753 06/60: Rename to parsec, Junpeng Qiu, 2016/10/25
- [elpa] master 2cce1e3 37/60: Rename parsec-from-just to parsec-from-maybe,
Junpeng Qiu <=
- [elpa] master cdb8c0d 47/60: Remove unused symbols, Junpeng Qiu, 2016/10/25
- [elpa] master fdb3d99 44/60: Fix some code in simple-csv-parser.el, Junpeng Qiu, 2016/10/25
- [elpa] master 701964f 57/60: Prepare headers for GNU ELPA, Junpeng Qiu, 2016/10/25
- [elpa] master cbd3352 55/60: Add parsec-lookahead, Junpeng Qiu, 2016/10/25
- [elpa] master a951fbe 41/60: Unify tag names, Junpeng Qiu, 2016/10/25
- [elpa] master dfb3af0 60/60: Add 'packages/parsec/' from commit '8f0c266d8b9b0ee5fcf9b80c518644b2849ff3b3', Junpeng Qiu, 2016/10/25
- [elpa] master 6cc3100 07/60: Fix indentations, Junpeng Qiu, 2016/10/25
- [elpa] master d98e8c8 05/60: Add url-encoded string parser, Junpeng Qiu, 2016/10/25
- [elpa] master a268b9f 08/60: Add more APIs, Junpeng Qiu, 2016/10/25
- [elpa] master 13637e1 15/60: Rename parsec-do-parse to parsec-with-input, Junpeng Qiu, 2016/10/25