Added compute-status-length function
Added fetch-user! generic