摘要: 第三天做改进本节生成的XML程序,增加空格以显示缩进结构。Builder := Object cloneBuilder depth ::= 0Builder forward := method( #depth ::= 0 prefix := (" " repeated (self depth)) writeln(prefix, "<", call message name, ">") #depth = (depth +1) self setDepth(self depth + 1) call message argumen 阅读全文
posted @ 2012-12-18 20:24 冰激淋 阅读(206) 评论(0) 推荐(0) 编辑