!7

//set flag guessDeepObjectSize_recursive_debug.

p-exp {
  assertTrue(printQuine(f -> long { guessStringSize("abc") }) > 8);
  assertTrue(guessStringSize("abc") < 100);
  assertTrue(printQuine(f -> long { guessStringSize("abcdefghijklm") }) > guessStringSize(""));
  printQuine(f { guessDeepObjectSize_recursive(new Long(1234)) });
  printQuine(f { guessDeepObjectSize_recursive(ll()) });
  printQuine(f { guessDeepObjectSize_recursive(ll("a")) });
  printQuine(f { guessDeepObjectSize_recursive(ll("a", "b")) });
  printQuine(f { guessDeepObjectSize_recursive(ll("a", "b", "c")) });
  printQuine(f { guessDeepObjectSize_recursive(ll("a", "b", "a")) });
  printQuine(f { guessDeepObjectSize_recursive(ll("a", "b", "a", "b")) });
  printQuine(f { guessDeepObjectSize_recursive(ll("a", "b", "a", "b", "a", "b")) });
  
  assertEqualsVerbose(0L, guessDeepObjectSize_recursive(jpanel()));
}