8 lines
129 B
Text
8 lines
129 B
Text
PROC Test(CHAR ARRAY s)
|
|
PrintF("Length of ""%S"" is %B%E",s,s(0))
|
|
RETURN
|
|
|
|
PROC Main()
|
|
Test("Hello world!")
|
|
Test("")
|
|
RETURN
|