equal
deleted
inserted
replaced
1 {-# LANGUAGE ScopedTypeVariables #-} |
1 {-# LANGUAGE ScopedTypeVariables #-} |
2 module Pas2C where |
2 module Main where |
3 |
3 |
4 import Text.PrettyPrint.HughesPJ |
4 import Text.PrettyPrint.HughesPJ |
5 import Data.Maybe |
5 import Data.Maybe |
6 import Data.Char |
6 import Data.Char |
7 import Text.Parsec.Prim hiding (State) |
7 import Text.Parsec.Prim hiding (State) |
1082 op2C "<>" = "!=" |
1082 op2C "<>" = "!=" |
1083 op2C "=" = "==" |
1083 op2C "=" = "==" |
1084 op2C "/" = "/(float)" |
1084 op2C "/" = "/(float)" |
1085 op2C a = a |
1085 op2C a = a |
1086 |
1086 |
|
1087 main = pas2C "hwengine" |