I can across something that puzzled me while develloping a caml application:

Using:
 let non_blank_string=
      if !is_first then
	trailling:=Buffer.contents white
      else
	Buffer.add_buffer buf white;
      Buffer.reset white;
      is_first:=false;
      Buffer.add_string buf

instead of

 let non_blank_string s=
      if !is_first then
	trailling:=Buffer.contents white
      else
	Buffer.add_buffer buf white;
      Buffer.reset white;
      is_first:=false;
      Buffer.add_string buf s

Doesn't yeld the same results (the former is buggy). Now, as I
understand, these two functions should be exactly equivalent. I am
misunderstanding something here?

Cheers,

Till Varoquaux