modelsim中的文件操作—— 大数据测试

　　在modelsim中不可避免的需要进行文件操作，在窗口中查看代码的操作情况，下面是我自己M序列实验中的一段测试代码

 integer i,j ,k,m; 

 integer m_dataFILE ,
         indataFILE ,
         oudataFILE ;

 reg [:] i_data[:] ;    

 initial
     begin
         m_dataFILE = $fopen ("./m_data.dat"); // m序列存储文件
         indataFILE = $fopen ("./indata.dat"); // 随机数（用于发送的数据）存储文件
         oudataFILE = $fopen ("./oudata.dat"); // 接收数据的存储文件
         for(i=;i<;i=i+)
             begin
                 i_data[i] = $random%;
                 $fdisplay (indataFILE,"%b",i_data[i]);
             end
         $fclose (indataFILE);
     end 

 always @ (posedge clock)
     if(reset)
         begin  : wirte_file
             $fdisplay (m_dataFILE,"%b",my_m.m_sequ); //m序列保存
         end 

下面一段是校验输出，接收和发送的数据如果出现错误就有错误提示

 reg [:] decode_data[:] ;            

 always @ (posedge clk1)
     if(!reset1)
         begin
             k <=  ;
             m <=  ;
         end
     else if((reset)&&(fi_flag))
         begin
             //decode_data[k] <= my_encode.ana_sign;
             k <= k+ ;
             $fdisplay (oudataFILE,"%b",my_encode.ana_sign); // 接收到的数据进行保存

             if(i_data[k-] == my_encode.ana_sign)
                 $display ("%b  OK! %b " ,i_data[k-],my_encode.ana_sign);
             else
                 begin
                     m <= m +  ;
                     $display ("%b  ERROR! %b " ,i_data[k-],my_encode.ana_sign);
                 end 

至于i_data[k-2], 这个为什么是-2，是因为数据数据停滞期是2个时钟