From 43311670119318d031c660a788716eda9b7bd618 Mon Sep 17 00:00:00 2001 From: bringert Date: Sun, 25 Mar 2007 11:26:03 +0000 Subject: [PATCH] Comments only. --- src/GF/Speech/FiniteState.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/GF/Speech/FiniteState.hs b/src/GF/Speech/FiniteState.hs index 7054784c8..69b8de457 100644 --- a/src/GF/Speech/FiniteState.hs +++ b/src/GF/Speech/FiniteState.hs @@ -48,6 +48,7 @@ import qualified GF.Visualization.Graphviz as Dot type State = Int -- | Type parameters: node id type, state label type, edge label type +-- Data constructor arguments: nodes and edges, start state, final states data FA n a b = FA !(Graph n a b) !n ![n] type NFA a = FA State () (Maybe a)