erreur dans l'exemple du manuel
This commit is contained in:
parent
1c5e73c809
commit
73adb06ff6
|
@ -1,4 +1,4 @@
|
|||
.\" $Id: genpat.1,v 1.1 2002/05/31 08:27:42 xtof Exp $
|
||||
.\" $Id: genpat.1,v 1.2 2002/10/04 14:06:08 francois Exp $
|
||||
.\" @(#)genpat 2.0 Sep 07 1993 UPMC; Author: PITON D.
|
||||
.TH GENPAT 1 "October 1, 1997" "ASIM/LIP6" "ALLIANCE USER COMMANDS"
|
||||
|
||||
|
@ -132,34 +132,31 @@ int entier;
|
|||
{
|
||||
int i;
|
||||
int j;
|
||||
int cur_vect;
|
||||
int cur_vect = 0;
|
||||
|
||||
DEF_GENPAT("vecteurs");
|
||||
DEF_GENPAT("example");
|
||||
|
||||
/* interface */
|
||||
DECLAR ("a", ":2", "X", IN, "0 to 3");
|
||||
DECLAR ("b", ":2", "X", IN, "0 to 3");
|
||||
DECLAR ("sel", ":2", "B", IN, "");
|
||||
DECLAR ("ck", ":2", "B", IN, "");
|
||||
DECLAR ("s", ":2", "X", OUT, "0 to 3");
|
||||
DECLAR ("a", ":2", "X", IN, "3 downto 0", "" );
|
||||
DECLAR ("b", ":2", "X", IN, "3 downto 0", "" );
|
||||
DECLAR ("s", ":2", "X", OUT, "3 downto 0", "" );
|
||||
DECLAR ("vdd", ":2", "B", IN, "", "" );
|
||||
DECLAR ("vss", ":2", "B", IN, "", "" );
|
||||
|
||||
LABEL ("additionneur");
|
||||
AFFECT ("0", "ck", "0b0");
|
||||
AFFECT ("0", "sel", "0b0");
|
||||
LABEL ("adder");
|
||||
AFFECT ("0", "vdd", "0b1");
|
||||
AFFECT ("0", "vss", "0b0");
|
||||
|
||||
for (i=0; i<16; i++)
|
||||
{
|
||||
for (j=0; j<16; j++)
|
||||
{
|
||||
cur_vect = i*16 + j;
|
||||
AFFECT (inttostr(cur_vect), "a", inttostr(i) );
|
||||
AFFECT (inttostr(cur_vect), "b", inttostr(j) );
|
||||
cur_vect++;
|
||||
}
|
||||
}
|
||||
|
||||
cur_vect = cur_vect + 1;
|
||||
AFFECT (inttostr(cur_vect), "a", "0b0");
|
||||
AFFECT (inttostr(cur_vect), "b", "0b0");
|
||||
AFFECT (inttostr(cur_vect), "sel", "0b0");
|
||||
AFFECT (inttostr(cur_vect), "ck" , "0b0");
|
||||
|
||||
SAV_GENPAT ();
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue