Changeset 30742
- Timestamp:
- Feb 23, 2011, 12:08:45 PM (15 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/pstamp_checkdependent.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/pstamp_checkdependent.pl
r30735 r30742 356 356 foreach my $chip (@$data) { 357 357 $chip_id = $chip->{chip_id}; 358 358 359 # if chip has been magicked before require it to be magicked again 359 360 if (($chip->{data_state} ne 'full') or ($need_magic or ($chip->{magicked} < 0))) { 361 if ($chip->{magicked} < 0) { 362 print "Input has been destreaked so we must destreak before warping\n"; 363 $need_magic = 1 364 } 360 # because the warp pending query requires it. 361 if ($chip->{magicked} < 0) { 362 print "Input has been destreaked so we must destreak before warping\n"; 363 $need_magic = 1 364 } 365 366 if ($need_magic and ($chip->{magicked} eq 0)) { 367 my_die("Client requires magic, but chip never magicked. How did this dependent get queued?", $PS_EXIT_PROG_ERROR); 368 } 369 370 if (($chip->{data_state} ne 'full') or ($need_magic and ($chip->{magicked} < 0))) { 365 371 $chips_ready = 0; 366 372 $chip->{fault} = $chip->{chip_fault};
Note:
See TracChangeset
for help on using the changeset viewer.
