Add a Newtype instance to StatusCode

Makes it easier for users of the library to access the underlying
statuscode with `unwrap`.

Author: ford-prefect

src/Affjax/StatusCode.purs

@@ -1,11 +1,13 @@
 module Affjax.StatusCode where
 
 import Prelude
+import Data.Newtype (class Newtype)
 
 newtype StatusCode = StatusCode Int
 
 derive instance eqStatusCode :: Eq StatusCode
 derive instance ordStatusCode :: Ord StatusCode
+derive instance newtypeStatusCode :: Newtype StatusCode _
 
 instance showStatusCode :: Show StatusCode where
   show (StatusCode code) = "(StatusCode " <> show code <> ")"