Changeset b30c30d


Ignore:
Timestamp:
11/19/13 13:31:38 (11 years ago)
Author:
Tomasz Obrebski <obrebski@…>
Branches:
master
Children:
d6a59ca
Parents:
b97a556
git-author:
Tomasz Obrebski <obrebski@…> (11/19/13 13:31:38)
git-committer:
Tomasz Obrebski <obrebski@…> (11/19/13 13:31:38)
Message:

tre czyta poprawnie wyj�cie z dgp

File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/tre/tre

    rb97a556 rb30c30d  
    278278    $sat << i if parts[1]=="s" 
    279279 
    280     $arcs |= parts[2].split(',').map{ |a| case a  
    281                                           when /\-\-(\w+)-(\d+)\((\d+)~(\d+)\)/ 
     280    $arcs |= parts[2].scan(/\([^()]+\)/).map{ |a| case a  
     281                                          when /\-\-(\w+):(\d+)/ 
    282282                                            # [i, $2.to_i, $1, $3.to_i, $4.to_i] 
    283283                                            [i, $2.to_i, $1, 0, 0] 
    284                                           when /\+\+(\w+)-(\d+)\((\d+)~(\d+)\)/ 
     284                                          when /\+\+(\w+):(\d+)/ 
    285285                                            # [$2.to_i, i, $1, $3.to_i, $4.to_i] 
    286286                                            [$2.to_i, i, $1, 0, 0] 
     
    380380  if $DEBUG then print "buildR--#{min}--#{max}--#{tree.inspect}\n" end 
    381381  trees=[] 
     382  print $arcs 
    382383  for arc in $arcs.select{|a| a[0]==max && $vis.include?([min,a[1]]) } 
    383384    if $DEBUG then print "ARC: #{arc.inspect}\n" end 
Note: See TracChangeset for help on using the changeset viewer.