代码清单5-138