From f6586ba8b4eba11122ffce3a4fad84b60f8f2c93 Mon Sep 17 00:00:00 2001
From: Stephen Diehl <stephen.m.diehl@gmail.com>
Date: Thu, 30 Jun 2016 23:02:39 -0400
Subject: [PATCH] Change safety language flags.

---
 src/Conv.hs    | 4 ++--
 src/Debug.hs   | 2 +-
 src/Functor.hs | 1 +
 src/Panic.hs   | 1 +
 4 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/src/Conv.hs b/src/Conv.hs
index 2b092b56f..99826e127 100644
--- a/src/Conv.hs
+++ b/src/Conv.hs
@@ -1,6 +1,6 @@
-{-# LANGUAGE TypeSynonymInstances #-}
+{-# LANGUAGE Trustworthy #-}
 {-# LANGUAGE FlexibleInstances #-}
-
+{-# LANGUAGE TypeSynonymInstances #-}
 
 module Conv (
   StringConv (..)
diff --git a/src/Debug.hs b/src/Debug.hs
index 1266aa06f..42be4c443 100644
--- a/src/Debug.hs
+++ b/src/Debug.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE Unsafe #-}
+{-# LANGUAGE Trustworthy #-}
 {-# LANGUAGE NoImplicitPrelude #-}
 
 module Debug (
diff --git a/src/Functor.hs b/src/Functor.hs
index 5f228b501..87d6bf349 100644
--- a/src/Functor.hs
+++ b/src/Functor.hs
@@ -1,4 +1,5 @@
 {-# LANGUAGE CPP #-}
+{-# LANGUAGE Safe #-}
 {-# LANGUAGE NoImplicitPrelude #-}
 
 module Functor (
diff --git a/src/Panic.hs b/src/Panic.hs
index 863feddb9..19e994ebf 100644
--- a/src/Panic.hs
+++ b/src/Panic.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE Trustworthy #-}
 {-# LANGUAGE DeriveDataTypeable #-}
 
 module Panic (