-- Turn bind into VHDL
let vhdl = State.evalState (mkVHDL binds) (VHDLSession 0 builtin_funcs)
liftIO $ putStr $ concat $ map (render . ForSyDe.Backend.Ppr.ppr) vhdl
-- Turn bind into VHDL
let vhdl = State.evalState (mkVHDL binds) (VHDLSession 0 builtin_funcs)
liftIO $ putStr $ concat $ map (render . ForSyDe.Backend.Ppr.ppr) vhdl