Commit 9050d5a6 authored by Michael Hanus 's avatar Michael Hanus

Imports updated

parent c32afe17
......@@ -12,6 +12,7 @@
"cdbi" : ">= 2.0.0",
"currycheck" : ">= 2.0.0",
"currypath" : ">= 0.0.1",
"finite-map" : ">= 0.0.1",
"fl-parser" : ">= 1.0.0",
"html" : ">= 2.0.0",
"printf" : ">= 0.0.1",
......
......@@ -20,9 +20,10 @@
module SQLConsistency(checkConsistency) where
import Char(toLower, toUpper)
import FiniteMap
import List(delete)
import Data.FiniteMap
import ParseTypes
import SQLAst
......
......@@ -19,9 +19,10 @@ module SQLParserInfoType
where
import Char(toLower)
import FiniteMap
import List(partition)
import Data.FiniteMap
--- Type synonyms for all parts of the parser information
type RelationFM = FM String (FM String [(String, RelationType)])
type RelationTypes = [((String, String, String), RelationType)]
......
......@@ -6,12 +6,13 @@
module SQLScanner(scan) where
import Char (isDigit, isAlpha, isAlphaNum, toLower)
import FiniteMap
import List (splitOn)
import Read (readInt)
import ReadShowTerm (readsQTerm)
import Time
import Data.FiniteMap
import SQLToken
---Scans an SQL-statement - returning it as list of Token.
......
......@@ -21,10 +21,11 @@
module SQLTyper(checkTypes) where
import Char(toLower, toUpper)
import FiniteMap
import List(isInfixOf)
import Time
import Data.FiniteMap
import ParseTypes
import SQLAst
......
......@@ -8,7 +8,7 @@
module Symboltab where
import FiniteMap
import Data.FiniteMap
--- A Symboltable consists of at least one pair of FiniteMaps.
--- There can be another table representing a surrounding scope.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment