Project

General

Profile

Revision be206ad8 src/backends/C/c_backend_mauve.ml

View differences:

src/backends/C/c_backend_mauve.ml
80 80
    (fun v ->
81 81
      let v_name = v.var_id in
82 82
      let v_type = pp_c_basic_type_desc (Types.repr v.var_type).Types.tdesc in
83
      fprintf fmt "\tReadPort<%s> port_%s = mk_readPort<%s>(\"%s\", " v_type v_name v_type v_name;
83
      fprintf fmt "\tReadPort<%s> & port_%s = mk_readPort<%s>(\"%s\", " v_type v_name v_type v_name;
84 84
      print_mauve_default fmt mauve_machine v;
85 85
      fprintf fmt ");@.";
86 86
    ) mauve_machine.mstep.step_inputs;
......
90 90
    (fun v ->
91 91
      let v_name = v.var_id in
92 92
      let v_type = pp_c_basic_type_desc (Types.repr v.var_type).Types.tdesc in
93
      fprintf fmt "\tWritePort<%s> port_%s = mk_writePort<%s>(\"%s\");@." v_type v_name v_type v_name;
93
      fprintf fmt "\tWritePort<%s> & port_%s = mk_writePort<%s>(\"%s\");@." v_type v_name v_type v_name;
94 94
    ) mauve_machine.mstep.step_outputs;
95 95

  
96 96
  fprintf fmt "};@.";

Also available in: Unified diff