Fixed the C++ backend where I was trying to be too clever with the sizes

2009-02-11 14:19:34 +00:00 · 2009-02-11 14:19:34 +00:00 · d0d5cf6779
commit d0d5cf6779
parent 6d112a244e
1 changed files with 2 additions and 1 deletions
--- a/backends/GenerateCPPCSP.hs
+++ b/backends/GenerateCPPCSP.hs
@ -636,7 +636,8 @@ cppintroduceSpec (A.Specification _ n (A.Is _ am t@(A.Array ds c@(A.ChanEnd {}))
       tell [","]
       genName n
       tell [","]
-       call genExpression (A.SizeVariable m $ A.Variable m n)
+       genName n
+       call genSizeSuffix "0"
       tell [");"]
 --For all other cases, use the C implementation:
 cppintroduceSpec n = cintroduceSpec n