added refcounting experiment with free pascal (refcounts.pas)