Fix fourmolu formatting and add changelog fragment

Author: Jimbo4350

.changes/20260414_cardano_api_has_callstack.yml

@@ -0,0 +1,8 @@
+project: cardano-api
+pr: 1175
+kind:
+  - compatible
+description: |
+  Add HasCallStack constraints to standalone functions that call error
+  directly or indirectly, improving stack traces. Dijkstra-era placeholder
+  error messages are also improved.

cardano-api/src/Cardano/Api/Experimental/Tx/Internal/Certificate/Compatible.hs

@@ -71,7 +71,7 @@ makeStakeAddressDelegationCertificate sCred delegatee =
     e@ShelleyBasedEraMary -> cert e delegatee
     e@ShelleyBasedEraAllegra -> cert e delegatee
     e@ShelleyBasedEraShelley -> cert e delegatee
-    ShelleyBasedEraDijkstra -> error "TODO: makeStakeAddressDelegationCertificate DijkstraEra"
+    ShelleyBasedEraDijkstra -> error "makeStakeAddressDelegationCertificate: Dijkstra era not supported"
  where
   cert
     :: Delegatee era ~ Api.Hash Api.StakePoolKey

cardano-api/src/Cardano/Api/Tx/Internal/Body.hs

@@ -2662,7 +2662,7 @@ makeShelleyTransactionBody
 
     txAuxData :: Maybe (L.TxAuxData E.ConwayEra)
     txAuxData = toAuxiliaryData sbe txMetadata txAuxScripts
-makeShelleyTransactionBody ShelleyBasedEraDijkstra _ = error "makeShelleyTransactionBody: Dijkstra is not  supported"
+makeShelleyTransactionBody ShelleyBasedEraDijkstra _ = error "makeShelleyTransactionBody: Dijkstra era not supported"
 
 -- ----------------------------------------------------------------------------
 -- Script witnesses within the tx body

cardano-api/src/Cardano/Api/UTxO.hs

@@ -355,7 +355,8 @@ fromMap = UTxO
 --------------------------------------------------------------------}
 
 -- | Convert from a `cardano-api` `UTxO` to a `cardano-ledger` UTxO.
-toShelleyUTxO :: HasCallStack => ShelleyBasedEra era -> UTxO era -> Ledger.UTxO (ShelleyLedgerEra era)
+toShelleyUTxO
+  :: HasCallStack => ShelleyBasedEra era -> UTxO era -> Ledger.UTxO (ShelleyLedgerEra era)
 toShelleyUTxO sbe =
   Ledger.UTxO . Map.foldMapWithKey f . unUTxO
  where