mirror of
https://github.com/gnustep/libs-steptalk.git
synced 2025-02-23 11:31:01 +00:00
7e338f778b
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/steptalk/trunk@16557 72102866-910b-0410-8b05-ffd578937521
21 lines
373 B
Smalltalk
21 lines
373 B
Smalltalk
" hello
|
|
|
|
Say hello to someone specified as an argument.
|
|
|
|
Ussage:
|
|
stexec hello.st name
|
|
"
|
|
|
|
" Is name specified? (Is there some script argument?) "
|
|
|
|
((Args count) > 0 )
|
|
ifTrue:
|
|
[
|
|
" Args is an array of script arguments. "
|
|
|
|
Transcript showLine: ('Hello ', (Args @ 0), '!').
|
|
]
|
|
ifFalse:
|
|
[
|
|
Transcript showLine:'Hello ... who?'
|
|
]
|