All pastes #94075 Raw Edit

Unnamed

public text v1 · immutable
#94075 ·published 2006-07-20 23:43 UTC
rendered paste body
LIB-COMPILATION AND INSTALLATION:
-----------------------------------------------------------------------------
- imlib2 ..................... SKIPPED
- edb ........................ ERROR!
-----------------------------------------------------------------------------

LAST LOGLINES FROM /tmp/easy_e17/install_logs/edb.log:
-----------------------------------------------------------------------------
Running aclocal...
configure.in:457: /usr/bin/m4: ERROR: Recursion limit of 1024 exceeded, use -L<N> to change it
autom4te: /usr/bin/m4 failed with exit status: 1
aclocal: autom4te failed with exit status: 1
-----------------------------------------------------------------------------
#sub locateOutputB{ #binary search version
sub locateOutput{ #binary search version
  my($needed,$L,$R,$j);
  $needed = $_[0];
  $L = 0;
  $R = $range2cnt-1;  #extremes of subscripts of intervals
  INNER: while (1) {  #must jump out
    #subdomains are in order and disjoint, but may not cover the domain
    $j = int(($L + $R)/2);  #careful, must look at two intervals at the end
                            # if two, then $j is $L to start
  #debug
  #$str = "binary search for ".$needed." in [".$L.",". $R ."], index: ".$j;
  #print "$str \n";
  #end debug
    if ($R - $L + 1 <= 2) { #must be in these subdomains if here                                  |
      #try first one                                                                              |
      #debug                                                                                      V
      #printf "needed: %.18e in [%.18e,%.18e)\n", $needed, $subDleft2[$j],$subDright2[$j]; this is line 457
      if ($needed >= $subDleft2[$j] && $needed < $subDright2[$j]) { #found
        last INNER
      }
      if ($L != $R) { # there were two, try the other
        $j = $R;
      #debug
      #printf "needed: %.18e in [%.18e,%.18e)\n", $needed, $subDleft2[$j],$subDright2[$j];
        if ($needed >= $subDleft2[$j] && $needed < $subDright2[$j]) { #found
          last INNER
        }
      }
      #not in either one, so can't be found
      return -1;
    }
    else { # [L,R] more than two subdomains; which way to shift?
      if ($needed < $subDleft2[$j]) { #it's left of here
        $R = $j;
      }
      else { #right
        $L = $j;
      }
    }
  } #end while(1)
  return $j;
} #end binary search version