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

Subversion Repositories socgen

[/] [socgen/] [trunk/] [tools/] [sys/] [workspace] - Diff between revs 95 and 96

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

Rev 95 Rev 96
Line 96... Line 96...
   symlink( "${home}/tools/bin/Makefile",      "${home}/work/${project}/bin/Makefile");
   symlink( "${home}/tools/bin/Makefile",      "${home}/work/${project}/bin/Makefile");
 
 
   $cmd ="chmod 755    ${home}/projects/${project}/bin/* \n";
   $cmd ="chmod 755    ${home}/projects/${project}/bin/* \n";
   if (system($cmd)) {}
   if (system($cmd)) {}
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
   my $path  = "${home}${prefix}${project}/children";
 
   mkdir $path,0755          unless( -e $path );
 
 
 
   my $path  = "${home}${prefix}${project}/children/Busdefs";
 
   mkdir $path,0755          unless( -e $path );
 
 
 
 
 
 
 
   &link_dir( "${home}/projects/Busdefs",     "${home}${prefix}${project}/children/Busdefs"  );
 
 
 
 
   my @components = qx(ls  ${home}/work/${project}/ip    );
   my @components = qx(ls  ${home}/work/${project}/ip    );
   foreach my $component (@components)
   foreach my $component (@components)
      {
      {
      chomp($component);
      chomp($component);
 
 
Line 119... Line 136...
 
 
 
 
 
 
 
 
 
 
#         foreach  my   $i_name ($doc->findnodes("//components/component/name"))
 
#            {
 
#            my($comp_name)  = $i_name ->findnodes('./text()')->to_literal ;
 
#            my($comp_version)  = $i_name ->findnodes('../version/text()')->to_literal ;
 
#            my($variant)  = $i_name ->findnodes('../variant/text()')->to_literal ;
 
#            $cmd ="./tools/sys/build_geda   $project  $component  /n";
 
#            if (system($cmd)) {}
 
#            }
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
         foreach  my   $i_name ($doc->findnodes("//components/component/name"))
         foreach  my   $i_name ($doc->findnodes("//components/component/name"))
            {
            {
            my($comp_name)  = $i_name ->findnodes('./text()')->to_literal ;
            my($comp_name)  = $i_name ->findnodes('./text()')->to_literal ;
            my($comp_version)  = $i_name ->findnodes('../version/text()')->to_literal ;
            my($comp_version)  = $i_name ->findnodes('../version/text()')->to_literal ;

powered by: WebSVN 2.1.0

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