OpenCores
URL https://opencores.org/ocsvn/zipcpu/zipcpu/trunk

Subversion Repositories zipcpu

[/] [zipcpu/] [trunk/] [sw/] [zasm/] [zasm.y] - Diff between revs 36 and 46

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 36 Rev 46
Line 503... Line 503...
        int             zpp_status;
        int             zpp_status;
        std::string     inclist;
        std::string     inclist;
        if (NULL != getenv("ZIPINC"))
        if (NULL != getenv("ZIPINC"))
                inclist = getenv("ZIPINC");
                inclist = getenv("ZIPINC");
 
 
        printf("Original INCLIST = %s\n", inclist.c_str());
 
 
 
        master_input_filename = NULL;
        master_input_filename = NULL;
 
 
        // Find what directory zasm is in, so that we can find zpp when
        // Find what directory zasm is in, so that we can find zpp when
        // necessary.
        // necessary.
        path_to_zasm = NULL;
        path_to_zasm = NULL;
Line 536... Line 534...
                                        } else
                                        } else
                                                inclist = &argv[argn+skp][2];
                                                inclist = &argv[argn+skp][2];
                                } else if (argn+skp+1
                                } else if (argn+skp+1
                                        if (inclist.size() != 0) {
                                        if (inclist.size() != 0) {
                                                inclist += std::string(":");
                                                inclist += std::string(":");
                                                inclist += &argv[argn+skp+1][2];
                                                inclist += argv[argn+skp+1];
                                        } else
                                        } else
                                                inclist = &argv[argn+skp+1][2];
                                                inclist = argv[argn+skp+1];
                                        argn++;
                                        skp++;
                                }
                                }
                        } else if (argv[argn+skp][1] == 'd')
                        } else if (argv[argn+skp][1] == 'd')
                                yydebug = 1;
                                yydebug = 1;
                        else if (argv[argn+skp][1] == 'h') {
                        else if (argv[argn+skp][1] == 'h') {
                                usage();
                                usage();
                                exit(0);
                                exit(0);
                        }
                        }
 
 
                        skp++;
                        skp++;
                } argv[argn] = argv[argn+skp];
                        argn--;
 
                } else {
 
                        argv[argn] = argv[argn+skp];
 
                }
        } argc -= skp;
        } argc -= skp;
 
 
        if (zout_fname) {
        if (zout_fname) {
                for(int argn=0; argn
                for(int argn=0; argn
                        if (strcmp(zout_fname, argv[argn])==0) {
                        if (strcmp(zout_fname, argv[argn])==0) {
                                fprintf(stderr, "ERR: Cowardly refusing to overwrite \'%s\'\n", zout_fname);
                                fprintf(stderr, "ERR: Cowardly refusing to overwrite \'%s\'\n", zout_fname);
                                exit(-2);
                                exit(-2);
                        }
                        }
                }
                }
        }
        }
        printf("New INCLIST = %s\n", inclist.c_str());
 
 
 
        if (preprocess_only) {
        if (preprocess_only) {
                objcode.open("/dev/null");
                objcode.open("/dev/null");
                if (zout_fname)
                if (zout_fname)
                        ppout = fopen(zout_fname, "w");
                        ppout = fopen(zout_fname, "w");

powered by: WebSVN 2.1.0

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