Code: Select all
/* Gerard Schildberger's badboy */
do i=0 to 7
$= ''
do j=0 to i
$= $ fff(j)
end
say $
end
exit
/* This is not a procedure, $ is still global */
fff: $= 12
return $
Code: Select all
/* Gerard Schildberger's badboy */
do i=0 to 7
$= ''
do j=0 to i
$= $ fff(j)
end
say $
end
exit
/* This is not a procedure, $ is still global */
fff: $= 12
return $