FreeCalypso > hg > ueda-linux
changeset 15:c59f52e4bacf
unet-bind option -c reports MCL components with no binding
author | Space Falcon <falcon@ivan.Harhan.ORG> |
---|---|
date | Sun, 02 Aug 2015 00:39:38 +0000 |
parents | 068ea2458c5d |
children | 65a515c20db8 |
files | ueda/sverp-bind/main.c ueda/sverp-bind/outcomp.c |
diffstat | 2 files changed, 9 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/ueda/sverp-bind/main.c Sun Aug 02 00:34:30 2015 +0000 +++ b/ueda/sverp-bind/main.c Sun Aug 02 00:39:38 2015 +0000 @@ -7,6 +7,7 @@ extern char *MCLfile; char *input_filename, *output_filename; +int check_completeness; static void usage() @@ -22,8 +23,11 @@ extern char *optarg; register int c; - while ((c = getopt(argc, argv, "I:M:")) != EOF) { + while ((c = getopt(argc, argv, "cI:M:")) != EOF) { switch (c) { + case 'c': + check_completeness++; + break; case 'I': add_symfile_dir(optarg); continue;
--- a/ueda/sverp-bind/outcomp.c Sun Aug 02 00:34:30 2015 +0000 +++ b/ueda/sverp-bind/outcomp.c Sun Aug 02 00:39:38 2015 +0000 @@ -12,6 +12,8 @@ extern char *get_comp_attr(); extern struct grid_pkg_desc *read_grid_pkg_file(); +extern int check_completeness; + struct outcomp *netlist_comps; static int @@ -79,6 +81,8 @@ process_hier_attr(oc, attr); else if (attr = get_comp_attr(oc->mclcomp, "slotmap")) process_slotmap_attr(oc, attr); + else if (check_completeness) + fprintf(stderr, "MCL component %s has no binding\n", oc->name); } init_outcomp_from_MCL()