Changeset b97a556 for src/tre

Timestamp:

11/19/13 10:07:16 (11 years ago)

Author:

Tomasz Obrebski <obrebski@…>

Branches:

master

Children:

b30c30d

Parents:

e0cd003

git-author:

Tomasz Obrebski <to@…> (11/19/13 09:55:00)

git-committer:

Tomasz Obrebski <obrebski@…> (11/19/13 10:07:16)

Message:

drobiazgi w dgp

File:

• src/tre/tre (modified) (3 diffs)

src/tre/tre

@@ -21 +21 @@
 $helptext=
 "The program generates trees from the graph output by dgp. dgp must\n"+
-"must be run with '-i ds' option.\n\n"+
+"must be run with '--info=ds' option.\n\n"+
 "Command:       tre [options]\n\n"+
 "Options:\n"+
@@ -269 +269 @@
 
     if parts[3]==nil || parts[4]==nil || parts[5]==nil
-      $stderr.print "ERR: tre requires dgp be called with '--info s' option. Aborting.\n"
+      $stderr.print "ERR: tre requires dgp be called with '--info=ds' option. Aborting.\n"
       exit
     end
@@ -280 +280 @@
     $arcs |= parts[2].split(',').map{ |a| case a 
                                           when /\-\-(\w+)-(\d+)\((\d+)~(\d+)\)/
-                                            [i, $2.to_i, $1, $3.to_i, $4.to_i]
+                                            # [i, $2.to_i, $1, $3.to_i, $4.to_i]
+                                            [i, $2.to_i, $1, 0, 0]
                                           when /\+\+(\w+)-(\d+)\((\d+)~(\d+)\)/
-                                            [$2.to_i, i, $1, $3.to_i, $4.to_i]
+                                            # [$2.to_i, i, $1, $3.to_i, $4.to_i]
+                                            [$2.to_i, i, $1, 0, 0]
                                           end }
     $succ |= parts[3][1..-2].split(',').map{|x| [x.to_i,i]}