[ARVADOS] updated: 3690225e29161191cc5daabe4a335a0ec5737d3d

git at public.curoverse.com git at public.curoverse.com
Fri Mar 14 15:13:28 EDT 2014


Summary of changes:
 sdk/cli/bin/crunch-job |   59 ------------------------------------------------
 1 files changed, 0 insertions(+), 59 deletions(-)

       via  3690225e29161191cc5daabe4a335a0ec5737d3d (commit)
      from  e3c95c76496fe399ef145990114eb83918e10dac (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.


commit 3690225e29161191cc5daabe4a335a0ec5737d3d
Author: Tim Pierce <twp at curoverse.com>
Date:   Fri Mar 14 15:14:37 2014 -0400

    Remove legacy 'thaw' code (refs #2221).

diff --git a/sdk/cli/bin/crunch-job b/sdk/cli/bin/crunch-job
index 2cd1002..07b4943 100755
--- a/sdk/cli/bin/crunch-job
+++ b/sdk/cli/bin/crunch-job
@@ -1241,65 +1241,6 @@ sub freeze
 sub thaw
 {
   croak ("Thaw not implemented");
-
-  # my $whc;
-  # my $key = shift;
-  # Log (undef, "thaw from $key");
-
-  # @jobstep = ();
-  # @jobstep_done = ();
-  # @jobstep_todo = ();
-  # @jobstep_tomerge = ();
-  # $jobstep_tomerge_level = 0;
-  # my $frozenjob = {};
-
-  # my $stream = new Warehouse::Stream ( whc => $whc,
-  #				       hash => [split (",", $key)] );
-  # $stream->rewind;
-  # while (my $dataref = $stream->read_until (undef, "\n\n"))
-  # {
-  #   if ($$dataref =~ /^job /)
-  #   {
-  #     foreach (split ("\n", $$dataref))
-  #     {
-  #	my ($k, $v) = split ("=", $_, 2);
-  #	$frozenjob->{$k} = freezeunquote ($v);
-  #     }
-  #     next;
-  #   }
-
-  #   if ($$dataref =~ /^merge (\d+) (.*)/)
-  #   {
-  #     $jobstep_tomerge_level = $1;
-  #     @jobstep_tomerge
-  #	  = map { freezeunquote ($_) } split ("\n", freezeunquote($2));
-  #     next;
-  #   }
-
-  #   my $Jobstep = { };
-  #   foreach (split ("\n", $$dataref))
-  #   {
-  #     my ($k, $v) = split ("=", $_, 2);
-  #     $Jobstep->{$k} = freezeunquote ($v) if $k;
-  #   }
-  #   $Jobstep->{'failures'} = 0;
-  #   push @jobstep, $Jobstep;
-
-  #   if ($Jobstep->{exitcode} eq "0")
-  #   {
-  #     push @jobstep_done, $#jobstep;
-  #   }
-  #   else
-  #   {
-  #     push @jobstep_todo, $#jobstep;
-  #   }
-  # }
-
-  # foreach (qw (script script_version script_parameters))
-  # {
-  #   $Job->{$_} = $frozenjob->{$_};
-  # }
-  # $Job->save if $job_has_uuid;
 }
 
 

-----------------------------------------------------------------------


hooks/post-receive
-- 




More information about the arvados-commits mailing list