Article View: fj.lang.st80
Article #14question about array
From: Nobuyuki Amaki
Date: Thu, 10 Dec 1992 02:38
Date: Thu, 10 Dec 1992 02:38
39 lines
1742 bytes
1742 bytes
$@$O$8$a$^(J$@$7$F!$E7LZ!w:eBg$H$$$$$^$9!%(J
$@:#G/$N(J 9$@7n:"$+$i!$(JSmalltalk-80$@$r;H$$;O$a$F$$$k$N$G$9$,!J=i$a$N$&$A$O(J
version2.5 10$@7n$NCf:"$+$i(Jrelease4.1$@$r;H$C$F$$$^$9!K!$=iJbE*$J$b$N$+$b(J
$@CN$l$^$;$s$,!$(JArray$@$N$3$H$GH=$i(J$@$J$$$3$H$,$"$k$N$G<ALd$7$^$9!%(J
$@#A!%(J
| tmp |
tmp := #(('1-1' '1-2') ('2-1' '2-2')).
1 to: 2 do: [ :i|
(tmp at: i) at: i put: 'new'].
^tmp
$@$H$9$k$H!$(J
#(#('new' '1-2' ) #('2-1' 'new' ) )
$@$H$$$&Ez$,JV$C(J$@$F$/$k$N$G$9$,!$(J
$@#B!%(J
| tmp |
tmp := (RunArray new: 2 withAll: (Array new: 2)) asArray.
1 to: 2 do: [ :i|
(tmp at: i) at: i put: 'new'].
^tmp
$@$H$9$k$H!$(J
#(#('new' 'new' ) #('new' 'new' ) )
$@$H$$$&Ez$,(J$@JV$C$F$-$^$9!%(J
$@#B!%$NEz$O!$#A!%$NEz$+$i$9$k$H!$(J
#(#('new' nil) #(nil 'new'))
$@$H$J$k$H;W$&$N$G$9$,!$(J$@$=$&$J$j$^$;$s!%(J
$@$I$&$9$l$P!$(J
#(#('new' nil) #(nil 'new'))
$@$H$$$&(J Array$@$rF@$k$3$H$,$G$-$k$h$&$K$J$k$N(J$@$G$7$g$&$+!)(J
syntax$@Ey$O(J Release4.1$@$G$N$b$N$G$9!%(J
--
-------
$@Bg:eBg3X(J $@;:6H5!3#9)3X@l96(J $@@VLZ8&(J M1
$@E7LZ(J $@D*G7(J $@!V$"$^$-(J $@$N$V$f$-!W(J
E-mail:amaki@meim.osaka-u.ac.jp
Technical Details
Message-ID:
<AMAKI.92Dec10113831@syd01.meim.osaka-u.ac.jp>Path:
arc1-ca.pugleaf.net!sparky!uunet!stanford.edu!sun-barr!sh.wide!wnoc-kyo!icspub!ccsparc01!taeko!slson3!mech-srv!amakiShow Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!stanford.edu!sun-barr!sh.wide!wnoc-kyo!icspub!ccsparc01!taeko!slson3!mech-srv!amaki From: amaki@meim.osaka-u.ac.jp (Nobuyuki Amaki) Newsgroups: fj.lang.st80 Subject: question about array Message-ID: <AMAKI.92Dec10113831@syd01.meim.osaka-u.ac.jp> Date: 10 Dec 92 02:38:31 GMT Sender: news@mech-srv.ccm.osaka-u.ac.jp Distribution: fj Organization: Dept. of Mech. Eng. for Ind. Mach. & Syst., Osaka Univ. Lines: 39 Nntp-Posting-Host: syd01