Commit 269a5561 authored by Hans-Peter Deifel's avatar Hans-Peter Deifel 🐢
Browse files

wta: Remove fixme

parent 971bc7b0

src/random-wta/Generator.hs

+0 −2
Original line number Diff line number Diff line
@@ -129,8 +129,6 @@ genTransitions' numTransitions = do 
  let n = numStates wtaSpec

      maxT = IndexedTransition.maxIndex wtaSpec



  -- FIXME Handle this case better. A nicer error output or something along this

  -- line.

  numTransitions' <- if (fromIntegral numTransitions > maxT) then do

      let cap = IndexedTransition.fromIndexd maxT

      lift $ hPutStrLn stderr ("warning: More transitions than possible requested. Capping at " <> show cap)