OpenCores
URL https://opencores.org/ocsvn/an-fpga-implementation-of-low-latency-noc-based-mpsoc/an-fpga-implementation-of-low-latency-noc-based-mpsoc/trunk

Subversion Repositories an-fpga-implementation-of-low-latency-noc-based-mpsoc

[/] [an-fpga-implementation-of-low-latency-noc-based-mpsoc/] [trunk/] [mpsoc/] [perl_gui/] [lib/] [verilog/] [functions.v] - Blame information for rev 56

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 18 alirezamon
 
2 56 alirezamon
 
3 18 alirezamon
 
4
        function   [15:0]i2s;
5
        input   integer c;  integer i;  integer tmp; begin
6
            tmp =0;
7 42 alirezamon
            for (i=0; i<2; i=i+1) begin
8
            tmp =  tmp +    (((c % 10)   + 48) << i*8);
9 18 alirezamon
                c       =   c/10;
10
            end
11
            i2s = tmp[15:0];
12
        end
13
   endfunction //i2s
14 48 alirezamon
 
15
/*
16 56 alirezamon
 
17
function integer log2;
18
                input integer number; begin
19
                log2=0;
20
                while(2**log2<number) begin
21
                        log2=log2+1;
22
                end
23
                end
24
        endfunction // log2
25
 
26 48 alirezamon
function   [159:0]f2s;
27
          input   real f; reg s;reg b; integer i; integer j;integer a;  real tmp; begin
28
              s=0;
29
              b=0;
30
              f2s={160{1'b0}};
31
              if(f<0)begin
32
                s=1;
33
                f=-f;
34
              end
35
              f=f*1000;
36
              a=f;
37
              i=0;
38
              j=0;
39
              while(a>0)begin
40
                j=j+1;
41
 
42
                if((a%10)!=0 || j>3 || b)begin
43
                                //f2s=(f2s & ~(8'hFF<< (i*8)));
44
                                f2s=f2s + (((a%10)+48)<< i*8);
45
                              i=i+1;
46
                              b=1;
47
                end
48
                a=a/10;
49
 
50
                if(j==3 && b==1)begin
51
                   //f2s=(f2s & ~(8'hFF<< (i*8)));
52
                   f2s=f2s   + ("."<< i*8);
53
                   i=i+1;
54
                   j=j+1;
55
                end
56
              end
57
              if(s) begin
58
                //f2s=(f2s & ~(8'hFF<< (i*8)));
59
                f2s=f2s + ("-"<< i*8);
60
 
61
              end
62
        end
63
      endfunction //f2s
64
*/

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.