fix up let floating inward and remove broken optimization subsumed by inlining
fix up let floating inward and remove broken optimization subsumed by inlining

darcs-hash:20051002021933-1a7c6-df9f2f6ba4384eba1fbd0459a66f2a3890b48de6

kirbyfan64/jhc,kirbyfan64/jhc,kirbyfan64/jhc,kirbyfan64/jhc