riscv
/
alliance
mirror of https://gitlab.lip6.fr/vlsi-eda/alliance.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Hello world

This commit is contained in:
Ludovic Jacomme 2002-05-02 12:59:12 +00:00
parent 5a2a971c94
commit 1b8f467609
1 changed files with 18 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
alliance/src/ctl/src/ctlview.c
View File

@ -195,14 +195,31 @@ void viewctltype( Type )
ctltype_list *Type;
{
long Index;
fprintf( stdout, "\n--> Type" );
viewctlline( Type->LINE );
fprintf( stdout, "\n\t\tNAME : %s", Type->NAME );
fprintf( stdout, "\n\t\tINDEX : %ld", Type->INDEX );
fprintf( stdout, "\n\t\tLEFT : %ld", Type->LEFT );
fprintf( stdout, "\n\t\tRIGHT : %ld", Type->RIGHT );
/* TO BE DONE */
fprintf( stdout, "\n\t\tCLASS : %c" , Type->CLASS );
fprintf( stdout, "\n\t\tSIZE : %ld", Type->SIZE );
if ( Type->BASE != (ctltype_list *)0 )
{
fprintf( stdout, "\n\t\tBASE : %s", Type->BASE->NAME );
}
fprintf( stdout, "\n\t\tVALUE : " );
for ( Index = 0; Index < Type->SIZE; Index++ )
{
fprintf( stdout, "%s ", Type->VALUE[ Index ] );
}
fprintf( stdout, "\n\t\tFLAGS : %lx", Type->FLAGS );
fprintf( stdout, "\n\t\tUSER : %lx", (long)Type->USER );