chore: fix some minor issues in the comments

Signed-off-by: tsinglua <tsinglua@outlook.com>

Author: tsinglua

cardano-node-capi/src/Node.hs

@@ -13,7 +13,7 @@ import           Foreign.Marshal.Array (peekArray)
 import           Foreign.Ptr (Ptr)
 
 -- | @crunNode@ is an exported C entry point to start a node.
--- We parese the same arguments as the node CLI, but allow to
+-- We parse the same arguments as the node CLI, but allow to
 -- pass the arguments as @char *argv[]@ from C.
 foreign export ccall "runNode" crunNode :: Int -> Ptr CString -> IO ()
 crunNode :: Int -> Ptr CString -> IO ()

trace-dispatcher/src/Cardano/Logging/Consistency.hs

@@ -21,13 +21,13 @@ newtype NSLookup = NSLookup (Map.Map T.Text NSLookup)
 
 
 -- | Checks if all namespaces in this configuration are legal.
---   Legal in this case means that it can be found by a hierarchcical
+--   Legal in this case means that it can be found by a hierarchical
 --   lookup in all namespaces.
 --   Warns if namespaces in all namespaces are not unique,
 --   Warns if namespaces in all namespaces are ending in the
 --   middle of another namespace.
 --   The namespaces in allNamespaces are consistent with the namespaces for the
---   severityFor, privacyFor, detailsFor, documentFor and metricsDofFor functions.
+--   severityFor, privacyFor, detailsFor, documentFor and metricsDocFor functions.
 checkTraceConfiguration ::
      FilePath
   -> TraceConfig
@@ -54,7 +54,7 @@ checkTraceConfiguration' trConfig allNamespaces' =
     in allWarnings
 
 -- | Check if a single namespace is legal. Legal in this case means that
---   it can be found by a hierarchcical lookup in all namespaces
+--   it can be found by a hierarchical lookup in all namespaces
 checkNamespace :: NSLookup -> [T.Text] -> Maybe T.Text
 checkNamespace nsLookup ns = go nsLookup ns
   where

trace-dispatcher/src/Cardano/Logging/Types.hs

@@ -284,7 +284,7 @@ data SeverityS
 
 -- | Severity for a filter
 -- Nothing means don't show anything (Silence)
--- Nothing level means show messages with severity >= level
+-- Just level means show messages with severity >= level
 newtype SeverityF = SeverityF (Maybe SeverityS)
   deriving stock Eq