(flos sind keine arrayss1!) |
Mgr (Diskussion | Beiträge) (Common-Lisp-Version) |
||
Zeile 10: | Zeile 10: | ||
end | end | ||
</pre> | </pre> | ||
Dieses Perl (*duck*) kann ja keiner lesen! | |||
<pre> | |||
(defvar *flo* #("dividuum" "syb" "fiji" "flowhase")) | |||
(dotimes (i 4) | |||
(format t "~&flo~d = ~a" i (svref *flo* i))) | |||
</pre> | |||
[[Kategorie:Wissen]] | [[Kategorie:Wissen]] | ||
[[Kategorie:Entropia]] | [[Kategorie:Entropia]] |
Version vom 1. November 2005, 17:53 Uhr
#!/usr/bin/env ruby flo = [ "dividuum", "syb", "fiji", "flowhase" ] # flos sind keine arrayss1! for i in 0..3 eval "flo#{i} = flo[#{i}]\n" eval "puts \"flo#{i} == #{flo[i]}\"\n" end
Dieses Perl (*duck*) kann ja keiner lesen!
(defvar *flo* #("dividuum" "syb" "fiji" "flowhase")) (dotimes (i 4) (format t "~&flo~d = ~a" i (svref *flo* i)))