diff options
| author | Csaba Hruska <csaba.hruska@gmail.com> | 2016-04-01 18:27:12 +0200 |
|---|---|---|
| committer | Csaba Hruska <csaba.hruska@gmail.com> | 2016-04-01 18:27:12 +0200 |
| commit | fff7adc8e51bdb13c266f0777101e4ead75df1d8 (patch) | |
| tree | deb46d345539ce9fb33731eb9843de729cdfdce3 /ddl/Generate.hs | |
| parent | 41f11c06f1b839ec83e0141f6a028d6a45057cb0 (diff) | |
fix java json handling
Diffstat (limited to 'ddl/Generate.hs')
| -rw-r--r-- | ddl/Generate.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/ddl/Generate.hs b/ddl/Generate.hs index 36d913e..7e7d3ca 100644 --- a/ddl/Generate.hs +++ b/ddl/Generate.hs | |||
| @@ -45,7 +45,6 @@ main = do | |||
| 45 | , "imports" .= imports | 45 | , "imports" .= imports |
| 46 | , "usedTypes" .= collectTypes aliasMap mod | 46 | , "usedTypes" .= collectTypes aliasMap mod |
| 47 | , "usedCSTypes" .= (Set.fromList $ Map.elems $ Map.fromList [ (csType name aliasMap t,t) | t <- Set.toList $ collectTypes aliasMap mod]) | 47 | , "usedCSTypes" .= (Set.fromList $ Map.elems $ Map.fromList [ (csType name aliasMap t,t) | t <- Set.toList $ collectTypes aliasMap mod]) |
| 48 | , "usedJavaTypes" .= (Set.fromList $ Map.elems $ Map.fromList [ (javaType aliasMap t,t) | t <- Set.toList $ collectTypes aliasMap mod]) | ||
| 49 | ] | 48 | ] |
| 50 | aliasMap = Map.fromList [(n,t) | TypeAlias n t <- def] | 49 | aliasMap = Map.fromList [(n,t) | TypeAlias n t <- def] |
| 51 | mylib :: HashMap Text Term | 50 | mylib :: HashMap Text Term |