ouroboros-network-framework: utf8 characters are not always well supp…

…orted On nix and Windows the following error can be observed ``` <stdout>: commitBuffer: invalid argument (invalid character) ``` This is misconfiguration of the locale, but the easiest way to fix it is to avoid the `→` character all together.
IntersectMBO · Mar 14, 2022 · e14e2a6 · e14e2a6
1 parent ffcd027
commit e14e2a6
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/ouroboros-network-framework/src/Ouroboros/Network/ConnectionManager/Types.hs b/ouroboros-network-framework/src/Ouroboros/Network/ConnectionManager/Types.hs
@@ -874,7 +874,7 @@ instance Show state
       => Show (Transition' state) where
     show Transition { fromState, toState } =
       concat [ show fromState
-             , " → "
+             , " -> "
              , show toState
              ]
 

diff --git a/ouroboros-network-framework/test/Test/Ouroboros/Network/Server2.hs b/ouroboros-network-framework/test/Test/Ouroboros/Network/Server2.hs
@@ -3695,7 +3695,7 @@ splitRemoteConns =
 
 ppTransition :: AbstractTransition -> String
 ppTransition Transition {fromState, toState} =
-    printf "%-30s → %s" (show fromState) (show toState)
+    printf "%-30s -> %s" (show fromState) (show toState)
 
 ppScript :: (Show peerAddr, Show req) => MultiNodeScript peerAddr req -> String
 ppScript (MultiNodeScript script _) = intercalate "\n" $ go 0 script