Merge pull request #10 from m4dc4p/extends-support

Support for `extends` keyword

Author: bgamari

GitLab/Job/Type.dhall

@@ -34,4 +34,5 @@ in  { stage : Optional Text
     , environment : Optional Environment
     , trigger : Optional Trigger
     , timeout : Optional Text
+    , extends : List Text
     }

GitLab/Job/append.dhall

@@ -59,6 +59,7 @@ let append
         , trigger =
             mergeOptional Trigger.Type Trigger.append a.trigger b.trigger
         , timeout = mergeOptionalRight Text a.timeout b.timeout
+        , extends = a.extends # b.extends
         }
 
 in  append

GitLab/Job/default.dhall

@@ -34,5 +34,6 @@ in    { stage = None Text
       , environment = None Environment
       , trigger = None Trigger
       , timeout = None Text
+      , extends = [] : List Text
       }
     : ./Type.dhall

GitLab/Job/toJSON.dhall

@@ -143,6 +143,18 @@ in  let Job/toJSON
                           job.trigger
                     , timeout =
                         Optional/map Text JSON.Type JSON.string job.timeout
+                    , extends =
+                        if    Prelude.List.null Text job.extends
+                        then  None JSON.Type
+                        else  Some
+                                ( JSON.array
+                                    ( Prelude.List.map
+                                        Text
+                                        JSON.Type
+                                        JSON.string
+                                        job.extends
+                                    )
+                                )
                     }
 
             in  JSON.object (dropNones Text JSON.Type everything)