for var in vars:
declarations += " " + var
if var in dimensions:
- for dim in dimensions[var]:
- declarations += "[" + print_C_expr(dim) + "]"
+ # Screwy MAD semantics, all dimensions are bumped up 1.
+ # Probably designed as a cheap way to prevent fencepost
+ # errors.
+ size_expr = ('+', dimensions[var][0], ('intnum', '1'))
+ declarations += "[" + print_C_expr(size_expr) + "]"
declarations += ","
declarations = declarations[:-1] + "; "
if declarations: