vcd 0.1.1 → 0.1.2

raw patch · 2 files changed

+4/−3 lines, 2 files

Files

Data/VCD.hs +3/−2
vcd.cabal +1/−1

Data/VCD.hs view

@@ -145,13 +145,14 @@     hPutStrLn (handle vcd) "$dumpvars"     dumpvars'     hPutStrLn (handle vcd) "$end"+    writeIORef (dirty vcd) True +  t <- readIORef $ time vcd+  writeIORef (time vcd) $ t + n   dirty' <- readIORef $ dirty vcd   when dirty' $ do-    t <- readIORef $ time vcd     hPutStrLn (handle vcd) $ "#" ++ show (t + n)     writeIORef (dirty vcd) False-    writeIORef (time vcd) $ t + n     hFlush $ handle vcd  identCodes :: [String]

vcd.cabal view

@@ -1,5 +1,5 @@ name:    vcd-version: 0.1.1+version: 0.1.2  category: Data