Parcourir la source

Formatting

master
Shaun Kerr il y a 6 ans
Parent
révision
486f986084
4 fichiers modifiés avec 2 ajouts et 1 suppressions
  1. BIN
      .Main.hs.swp
  2. BIN
      Main
  3. +2
    -1
      Main.hs
  4. BIN
      Main.o

BIN
.Main.hs.swp Voir le fichier


BIN
Main Voir le fichier


+ 2
- 1
Main.hs Voir le fichier

@@ -137,7 +137,8 @@ printLegal (l, p, b, r) = [


printPreview :: Maybe Preview -> [String] printPreview :: Maybe Preview -> [String]
printPreview (Just (i, o, (Bb bi), (Bb bo))) = [ printPreview (Just (i, o, (Bb bi), (Bb bo))) = [
("In : " ++ (intercalate ", " $ (cleanDP i) ++ cbi))
"Upcoming Changes:"
, ("In : " ++ (intercalate ", " $ (cleanDP i) ++ cbi))
, ("Out: " ++ (intercalate ", " $ (cleanDP o) ++ cbo)) , ("Out: " ++ (intercalate ", " $ (cleanDP o) ++ cbo))
] ]
where where


BIN
Main.o Voir le fichier


Chargement…
Annuler
Enregistrer