updated README

Meowcolm024 · Feb 20, 2020 · 6bafcf0 · 6bafcf0
1 parent 6baa710
commit 6bafcf0
Show file tree

Hide file tree

Showing 4 changed files with 9 additions and 2 deletions.
diff --git a/ChangeLog.md b/ChangeLog.md
@@ -2,4 +2,8 @@
 
 ## Unreleased changes
 
+- Nothing
+
+## 0.1.0
+
 - Supported: `Heading`, `Ordered List`, `Unordered List`, `Image`, `Link`, `Comment`, `Quote`, `Inline`
diff --git a/README.md b/README.md
@@ -71,7 +71,7 @@ Examples:
 3. 表之實例也
 ```
 
-For unordered lists, use `〇` (text should follow directly without leaving a space), and it ends with `【列終】`.
+For unordered lists, use `〇`, and it ends with `【列終】`.
 
 ``` markdown
 〇《滕王閣序》
@@ -82,7 +82,7 @@ For unordered lists, use `〇` (text should follow directly without leaving a sp
 
 ### Comments
 
-**Notice**: There should not be spaces in the comment line (otherwise it may not work...)
+Comments start with `批：`:
 
 ``` markdown
 批：註釋也

diff --git a/package.yaml b/package.yaml
@@ -9,6 +9,8 @@ copyright:           2020 Malcolm Law
 extra-source-files:
 - README.md
 - ChangeLog.md
+- examples/*.md
+- examples/*.jian
 
 # Metadata used when publishing your package
 # synopsis:            Short description of your package

diff --git a/src/Hanzi.hs b/src/Hanzi.hs
@@ -13,6 +13,7 @@ shuzi = Map.fromList $ zip "零一二三四五六七八九十" [0 .. 10]
 wei :: Map.Map Char Int
 wei = Map.fromList $ zip "十百千萬" [10, 100, 1000, 10000]
 
+-- Only support natural numbers less then 100,000
 shuziToInt :: String -> Int
 shuziToInt x = sum $ map groupDigit $ sepBy x []  where
     groupDigit :: String -> Int