Multiple distinct objects: Difference between revisions
no edit summary
No edit summary |
|||
Line 1,197:
for I:= 0 to N-1 do A:= I*3; \error: "references to the same mutable object"
]</lang>
=={{header|Yabasic}}==
<lang Yabasic>sub test()
print "Random number: " + str$(ran(100))
end sub
sub repL$(e$, n)
local i, r$
for i = 1 to n
r$ = r$ + "," + e$
next
return r$
end sub
dim func$(1)
n = token(repL$("test", 5), func$(), ",")
for i = 1 to n
execute(func$(i))
next i</lang>
=={{header|zkl}}==
| |||