140 bytes BF interpreter in C

  // shortest BF interpreter with whitespace:

  s[999], *r=s, *d, c;

  main(a, b)
  {
      char *v=1[d=b];
      for(;c = *v++ % 93;)
          for(b = c%7 ?
                  a &&
                      (c & 17 ?
                            c & 1 ?
                                (*r -= c - 44)
                                :(r += c - 61)
                             :c & 2 ?
                                putchar(*r)
                                :(*r = getchar())
                      ,0)
                  :v;
              b&&c | a * *r;
              v=d)
                  main(!c,&b-1);
      d = v;
  }