if $argc==1
print *$plist_iter
else
- print $plist_iter->$arg1
+ if $argc==2
+ print $plist_iter->$arg1
+ else
+ print$arg2 $plist_iter->$arg1
+ end
end
set var $plist_iter=$plist_iter->next
end
end
document plist
List dumper iterating by `->next':
-plist <head pointer> [<data field to display>]
+plist <head pointer> [<data field to display>] [/<format>]
end
define countlist
set var $countlist_iter=$arg0