comparison modules/parser.tp @ 232:25b800094623

Fix string method of funcall nodes
author Michael Pavone <pavone@retrodev.com>
date Thu, 02 Jan 2014 23:42:33 -0800
parents e48c74a7539e
children 370e03964239
comparison
equal deleted inserted replaced
231:e48c74a7539e 232:25b800094623
694 args <- nextArgs 694 args <- nextArgs
695 string <- { 695 string <- {
696 str <- "" 696 str <- ""
697 curArgs <- args 697 curArgs <- args
698 nameParts <- name splitOn: ":" 698 nameParts <- name splitOn: ":"
699 foreach: nameParts :part { 699 foreach: nameParts :idx part {
700 str <- str . part . ":" 700 str <- str . part . ":"
701 if: (not: (curArgs empty?)) { 701 if: (not: (curArgs empty?)) {
702 str <- str . " " . (curArgs value) 702 str <- str . " " . (curArgs value)
703 curArgs <- curArgs tail 703 curArgs <- curArgs tail
704 } 704 }