luke
/
sv2v
mirror of https://github.com/zachjs/sv2v.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

struct conversion handles decls with unpacked dimensions

This commit is contained in:
Zachary Snow 2019-04-23 15:37:47 -04:00
parent 5583eaeca8
commit 4e34217472
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Convert/Struct.hs
View File

@ -159,7 +159,9 @@ collectTFArgsM _ = return ()
traverseDeclM :: Decl -> State Types Decl traverseDeclM :: Decl -> State Types Decl
traverseDeclM origDecl = do traverseDeclM origDecl = do
case origDecl of case origDecl of
Variable _ t x _ _ -> modify $ Map.insert x t Variable _ t x a _ -> do
let (tf, rs) = typeRanges t
modify $ Map.insert x (tf $ a ++ rs)
Parameter t x _ -> modify $ Map.insert x t Parameter t x _ -> modify $ Map.insert x t
Localparam t x _ -> modify $ Map.insert x t Localparam t x _ -> modify $ Map.insert x t
return origDecl return origDecl