~cpp
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
:[] Smalltalk #2 :
:홍() 1998-11-23 10:40 회:392 1/34
Smalltalk #2
1998. 11. 22. 홍
mailto:andrea92@hitel.net
======================================
1. Smalltalk
1.1.
→1.2. Smalltalk
1.3. Smalltalk
........
=======================================
1. Smalltalk
------------------------------
1.2. Smalltalk
~~~~~~~~~~~~~~~~~~~~~
Smalltalk 하 해 템
Smalltalk 환 합. Object Arts
Dolphin Smalltalk 할 , Dolphin Smalltalk
.
Dolphin Smalltalk Smalltalk 환 포하
. Dolphin Smalltalk 1.1판 , 2.1판 .
하 한 환 1.1판.
할 .
Object Arts 하 포판 파 Dolphin981Setup.Exe
, 파 한 행 파 WinZip
하 . Dolphin Smalltalk 하 해
.
1. Dolphin Smalltalk Dolphin Education Center
.
2. 파 zip 파 WinZip 파
하 하 푸.
3. 행 파 하 , 행키
. 파 행파 행하 화
.
4. 할 <Next>
. 항
.
5. 하 Dolphin Smalltalk
. 하 .
하 . 히 해
할 . 하
Dolphin Smalltalk 판 " /" 통해 할
.
Dolphin Smalltalk 하 해 " → → Dolphin
Smalltalk 98" 킨 "Dolphin Smalltalk 98"
행하 .
---<!>-----------------------------------------------------------
Dolphin Smalltalk 하 행할 화
. , 하 Dolphin Smalltalk
행 할
. 하 Object Arts 하
호 하, 해 히 합.
--------------------------------------------------------------------
1.3. Smalltalk
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Smalltalk Smalltalk 환 행
. "Transcript" "Workspace"
. Smalltalk 행킬
. 해 할 'Untitled -
Workspace' . "Welcome to Dolphin
Smalltalk/98" 큰 함 .
Smalltalk 행하 해,
Smalltalk 한 흥 한 Smalltalk
. Smalltalk
행하 , Smalltalk
행 Smalltalk 파할
하.
Workspace "" .
Smalltalk 템 , 확
하 . '' '패' 한
. 흔히 하 텍트 편 한
.
, (block) 한
할 . 텍
트 편 , Smalltalk ,
행할 .
판 (scroll bar) 해
화 .
----------------------------------------------------------
"First evaluated by Smalltalk in October 1972, and by Dolphin in
February 1995. With a bit of luck the answer will be 7."
3 + 4.
----------------------------------------------------------
Smalltalk 행할 .
Smalltalk 행하 ,
행 해 하 .
, Smalltalk . 향
하
3 + 4.
하. '.' 키 .
판 <Ctrl-D> . 화 펴.
(block) "7" .
3 + 4. ☞ 7
"7" 행킨
. "3 + 4" 행하 "7"
.
Smalltalk 행하
. 태 판 <Delete> <Back
Space> 하 , 행
.
행한 1972 10 Smalltalk 템
합. Object Arts 1995 2 Dolphin
Smalltalk 행했.
행할 .
200 factorial.
, 했 <Ctrl-D> 해
행. ?
200 factorial.
☞788657867364790503552363213932185062295135977687173263294742533244359
44996340334292030428401198462390417721213891963883025764279024263710506
19266249528299311134628572707633172373969889439224456214516642402540332
91864131227428294853277524242407573903240321257405579568660226031904170
32406235170085879617892222278962370389737472000000000000000000000000000
0000000000000000000000
200!, 200 한 . 한
. 하 ? C++ Java
하 한
했 .
---<!>----------------------------------------------------------
?
(階, factorial) n 하 , 1 n
n 하 (한학회, 1994, 큰).
테 5! 5x4x3x2x1, 120 .
----------------------------------------------------------
Smalltalk 200! 하 ?
행하 . <Ctrl-D> 하.
Time millisecondsToRun: [200 factorial]. ☞ 1
! 200! 하 1ms .
1ms 1000 1, 200! 할
.
하 할 . 행해 . (
행하 해 해 하 <Ctrl-D>
하 ?)
Time microsecondsToRun: [200 factorial]. ☞ 1024
200! 하 100 1 하
. 1024㎲ .
행했 .
행하 퓨 하 합.
한 한 . 하 Smalltalk
100 1 행 할 한
.
Smalltalk 한 . Smalltalk 환
(object) , (class) 해
. 행키 Smalltalk 환
한 .
Class allClasses asSortedCollection.
☞ a SortedCollection(_FPIEEE_RECORD AbstractCardContainer
AbstractToTextConverter ACCEL AcceleratorPresenter AcceleratorTable
....()....
DWORDBytes DWORDField EDITSTREAM ... etc ...
화 표.
. "... etc ..." . 화 표 훨
한 . 한 행한
. ?
.
펴 Smalltalk 행한
. "3 + 4." 한
한 .
한 해,
행 .
한 행해 .
판 <Ctrl-I> . <Ctrl-D> <Ctrl-I>
해 .
Class allClasses asSortedCollection. ☞ "Inspector "
? "Inspecting a SortedCollection" 화
. " 탐"(object inspector),
히 "탐"(inspector) .
self 하 항 , 1,
2, 3,... 호 .
항 표하 . "self" 항 택
, <Ctrl-D> 행했
.
항 , 1, 2, 3,... 호 항 해
. 항 하 .
Smalltalk 환 할 (class).
항 ? 567. ,
Smalltalk 템 500 한 .
한 훑 탐 .
행. Smalltalk 환
(object) 하 . <Ctrl-I>
<Ctrl-D> 행하.
Object allSubinstances size. ☞ 44121
44121 .
, 하
Smalltalk 환 4 행
하 .
'' '' 하 하?
파하 ? . Smalltalk
하 하 . Smalltalk
행하 .
Smalltalk 행해 .
Smalltalk 행하 해 하
하 하.
1. 행해 할 .
2. <Ctrl-D> 하 행 .
3. 하 <Ctrl-I> 하 "탐"
통해 펴 .
? 해 휴
하. 한
행 .
, 행.
<탕 1> 한
digitalClockProcess := [[
Processor sleep: 1000.
(DesktopView current canvas)
font: (Font name: 'Arial' pointSize: 36) bold;
text: Time now printString at: 10@10;
free
] repeat] fork.
----------------------------------------------------------
한 Smalltalk 행해 .
<탕 1> .
행할 ?
합. .
1. 하 .
2. , <Shift> 향
하
. 편한 하
. 한 한
한 .
한 <Ctrl-D> 하 행
. ?
<탕 1>
☞ a Process(a CompiledExpression, priority: 5, state: #ready)
<Ctrl-D>
화 하 표 .
. 하 . <탕
1> 한 화 .
한 표 편할
. , 표한 합
. 행하. 한
. <Ctrl-D> .
digitalClockProcess terminate. ¬
UserLibrary default invalidate: nil lpRect: nil bErase: true.
☞ true
'¬' 표 한 한
합.
표 한
.
행하 태 표 'true'
.
행해 . 하 <탕 1> 화
, 하 하
. 행한
? .
하, 행
표하 .
Smalltalk 행하 .
<Ctrl-E> . 행하
화 표하 합.
행했 <탕 1> "UserLibrary" 하 ,
<Ctrl-D> <Ctrl-E> 하 행 . 한 하
행 .
, 한 합. Smalltalk 행하 ...
---<>----------------------------------------------------------
Smalltalk 행
* <Ctrl-D>: 형태. 행하 .
* <Ctrl-I>: 행하 할 , 탐한.
* <Ctrl-E>: 행 하 .
----------------------------------------------------------
---< Smalltalk>---------------------------------------
Dolphin Smalltalk Smalltalk 환 행
. 해 행
하 할 .
----------------------------------------------------------
, 해 Smalltalk 할 험해 .
(wave) 파 해 .
(Sound fromFile: 'xxxxx.wav') woofAndWait; woofAndWait.
'xxxxx.wav' 하 파
. 행 행 하
, <Ctrl-E> 하 행 .
(Sound fromFile: 'C:\Windows\Media\Ding.wav') woofAndWait; woofAndWait.
행해 . 하 한 파
해 합. ! Smalltalk 티???
해
. 100 .
(1 to: 100) collect: [:i | i]. ☞ #(1 2 ...()... 99 100)
? <Ctrl-D> 하 <Ctrl-I> 하 탐
해 . ( 하?) 1
100 100 (array)
. '' 히 해 호 '통' 하 .
, Smalltalk 행 해 .
행해 . , 해 .
TV 합.
희 택 하
호 '호 통' 해하
, 하? .
(Random new next: 6) collect: [:n | (n * 49) rounded].
☞ #(37 48 22 19 22 24 ) " 행"
☞ #(4 36 20 37 24 5 ) " 행"
☞ #(18 43 28 15 41 22 ) " 행"
...()...
행할 호 . 하 ?
하 황
.
한 .
확 . ( 행 .)
할 합.
하... 한
한 . 판
행하.
<탕 2>
r := Random new.
s := Set new.
[ s size = 6 ] whileFalse: [s add: (r next * 49) rounded].
s asSortedCollection asArray.
[ 행
☞ #(15 18 21 25 31 39 ) " 행"
☞ #(6 11 21 26 27 31 ) " 행"
...()...
----------------------------------------------------------
<탕 2> 히 ,
큰 , .
?
하 ,
휘할 회 . <Ctrl-E> 하
행하.
scribble := Scribble show.
화 'a Scribble' . 하
.
. ?
판 합. 한 행 .
행했 판 하.
EtchASketch showOn: scribble model.
행하 "Etch A Sketch" 판 .
판 .
Dolphin Smalltalk "Etch-a-Sketch" 판 편
.
화 판 Etch-aSketch .
한 .
하 . Dolphin
Smalltalk "MVP "
. "MVP " 해 하 ,
히 합.
판 .
" "(walkback window) 표하 .
해 하 ,
행 하 .
self halt.
행하 " " . 통
<Terminate> 해.
해 <Debug>
Smalltalk 환 (debugger) 하 .
해 Smalltalk 환 한
. 하. Smalltalk
해 해
할 . 하
? ^^:
Smalltalk 환 'Dolphin' 포함 탕
(source code) . 3MB 큰 파
.
'Dolphin' 포함하 탕
.
SmalltalkSystem current browseContainingSource: 'Dolphin'.
"Containing Source: 'Dolphin'"
. 탕 , 해 한
표 . Smalltalk 환 Dolphin
, 한 펴
. ( '탕' .)
. 행해 ,
한 . 하?
행 해 . 행해 .
View destroyAll.
행 Smalltalk 환
"Transcript" 하 . 하
? ^^:
Smalltalk 환 하 하
. 행해 했
흔(?) 하 하 .
Smalltalk 행해 .
행하 해 . 행할
<Ctrl-D>, <Ctrl-E>, <Ctrl-I> 한
. 한 한 행하
.
Smalltalk 합
. Smalltalk
한 해 .
Smalltalk 하,
. Smalltalk Smalltalk 태 하
. 합
. 히 .
하 Smalltalk 환 향
하 . Smalltalk 해
해 . 한
하.
...