Change use to type-based pool allocator in sh.c.