有负数和数组时在verilog中读写答案

【问题标题】：read and write in verilog when having negative numbers and array有负数和数组时在verilog中读写
【发布时间】：2015-03-16 09:27:08
【问题描述】：

我现在正在从 txt 文件中读取输入数据并将结果写入 txt 文件。

然而，结果在模拟中运行良好，但无法链接回 o = a+b 的 conv 模块；系统能够读取 x.txt 和 d.txt 中的值，但无法将其链接回 a 和 b。我的错误是什么以及如何改正？

从同样的情况下，我发现系统无法写出负十进制值，尽管它在 $fwrite 中更改为“%d\n”。有什么方法可以解决吗？我应该使用 $dumpfile 来获得负数作为输出吗？？

这是d.txt中的内容

x.txt 中的内容

这是我的模块代码：

module conv (input signed[15:0]a,b,
         output signed[15:0] o);

assign o = a + b;
endmodule

我的测试平台代码：

module conv_tb();

reg clk;
reg signed [15:0]a[4:0];
reg signed [15:0]b[4:0];
wire signed [15:0]o[4:0];

integer ai,bi,oo,i;

conv U1(.a(a),.b(b),.o(o));

initial begin
    clk <= 1'b0;
    forever
    #1 clk = ~clk;
end

initial begin
   ai = $fopen("x.txt","r");
   bi = $fopen("d.txt","r");
   oo = $fopen("o.txt","w");
   #1;
   for (i = 0; i<5; i=i+1)
       a <= $fscanf(ai,"%d\n",x);
       b <= $fscanf(bi,"%d\n",d);
       #4;
       $fwrite(oo,"%d\n",o);
   end
   $fclose(ai);
   $fclose(bi);
   $fclose(oo);
   $finish;
   end
endmodule

【问题讨论】：

在 for 循环中添加 begin 并删除 tb 中的解压数组可能会有所帮助
@Emman 在 for 循环中添加 begin 并删除 tb 中的解压缩数组后，tb_conv.v(28) 出现问题：“$fclose”附近：语法错误，意外的 SYSTEM_IDENTIFIER
您使用的是哪个编译器？在这里它正在工作edaplayground.com/x/3P4

标签： io verilog fwrite fread negative-number

【解决方案1】：

使用 fwrite 将带符号的数字写入文本文件的示例：

module write_signed;
integer out_file;
initial begin
   out_file = $fopen("out_file.txt","w");
   $fwrite(out_file, "%d\n", 3);
   $fwrite(out_file, "%d\n", 2);
   $fwrite(out_file, "%d\n", 1);
   $fwrite(out_file, "%d\n", 0);
   $fwrite(out_file, "%d\n", -1);
   $fwrite(out_file, "%d\n", -2);
   $fclose(out_file);
end

endmodule

生成：

【讨论】：

如果上面的计算是负数，可以把3,2,1,0,-1,-2换成'o'吗？
我会这么想的。如果您仍然遇到签名号码的问题，那么尝试创建一个像这样检查它是否正常工作的最小示例可能是个好主意，然后根据需要添加额外的位。注意 16 位加 16 位得到 17 位结果，在某些情况下您可能会看到下溢/上溢。
我发现我的系统的加法和乘法运行良好，但是当涉及负数时，结果似乎与计算不同。背后的问题是什么？是否溢出？ stackoverflow.com/questions/29103590/…

【解决方案2】：

解决您的问题的另一种方法是使用如图所示的十六进制值输入，将所有负值显式转换为文本文件中对应的十六进制值是必需的

module conv ( input signed [15:0] a, b,
              output signed [15:0] o);
  assign o = a + b;
endmodule

module conv_tb(); 
reg signed [15:0] a,b,o;
conv u0(.a(a),.b(b),.o(o));

reg [15:0] Mem [0:4]; 
reg [15:0] Mem1 [0:4]; 
integer j,k,oo; 

initial
begin 
  $readmemh("x.txt",Mem); 
  $readmemh("d.txt",Mem1); 
  oo = $fopen("o.txt","w");
end

initial begin 
  for (k=0; k<5; k=k+1) begin a= Mem[k]; end
  for (j=0; j<5; j=j+1) begin b= Mem1[j]; $fwrite(oo,"%d\n",o); end
end 
endmodule

【讨论】：