summaryrefslogtreecommitdiff
path: root/indexing/hsindex/src/HsIndex/CharLists/English.hs
diff options
context:
space:
mode:
Diffstat (limited to 'indexing/hsindex/src/HsIndex/CharLists/English.hs')
-rw-r--r--indexing/hsindex/src/HsIndex/CharLists/English.hs34
1 files changed, 34 insertions, 0 deletions
diff --git a/indexing/hsindex/src/HsIndex/CharLists/English.hs b/indexing/hsindex/src/HsIndex/CharLists/English.hs
new file mode 100644
index 0000000000..27adf8186e
--- /dev/null
+++ b/indexing/hsindex/src/HsIndex/CharLists/English.hs
@@ -0,0 +1,34 @@
+-- |
+-- Module : HsIndex.CharLists.English
+-- Copyright : Jean-Luc JOULIN 2018-2019
+-- License : General Public Licence (GPLv3)
+-- Maintainer : Jean-Luc JOULIN <jean-luc-joulin@orange.fr>
+-- Stability : alpha
+-- Portability : portable
+-- The letters, numbers and symbol definition for the english language.
+
+
+module HsIndex.CharLists.English where
+
+import HsIndex.Types
+import HsIndex.Functions
+import HsIndex.CharLists.Symbols
+import HsIndex.CharLists.French
+
+
+
+ordEnglish = lstLatinLetter
+
+ordEnglishUpperLower = upperLower lstLatinLetter
+
+
+-- |
+langDefEnglish :: LangDef
+langDefEnglish = LangDef
+ { lstLetters = lstSpace ++ ordEnglishUpperLower
+ , lstNumbers = lstDigit
+ , lstSymbols = Nothing
+ , lstSubs = subsFrenchUpperLower++subsSymb
+ , lstSecOrder = [Symbols, Numbers, Letters]
+ }
+