Multiple distinct objects: Difference between revisions
Content added Content deleted
(added scheme example) |
|||
Line 24: | Line 24: | ||
show_sublist(list l) |
show_sublist(list l) |
||
{ |
{ |
||
integer i; |
integer i, v; |
||
i |
for (i, v in l) { |
||
o_space(sign(i)); |
|||
o_integer(v); |
|||
o_space(1); |
|||
} |
|||
o_integer(l_q_integer(l, i)); |
|||
i += 1; |
|||
} |
} |
||
} |
} |
||
Line 40: | Line 36: | ||
{ |
{ |
||
integer i; |
integer i; |
||
list v; |
|||
i |
for (i, v in l) { |
||
while (i < l_length(l)) { |
|||
o_text(" ["); |
o_text(" ["); |
||
show_sublist( |
show_sublist(v); |
||
o_text("]"); |
o_text("]"); |
||
i += 1; |
|||
} |
} |
||
Line 57: | Line 52: | ||
list l; |
list l; |
||
call_n(n, l_append, l, o); |
|||
l_append(l, o); |
|||
n -= 1; |
|||
} |
|||
return l; |
return l; |
||
Line 80: | Line 72: | ||
# modify one of the sublists |
# modify one of the sublists |
||
l_q_list(l, 3)[0] = 7; |
|||
# display the list of lists |
# display the list of lists |