20 lines
229 B
Plaintext
20 lines
229 B
Plaintext
//
|
|
// $Id$
|
|
//
|
|
|
|
//
|
|
|
|
procedure main()
|
|
|
|
local s := " " + chr(0) + " mab " + chr(0) + " "
|
|
|
|
StrDump( s )
|
|
QOut( s )
|
|
|
|
qout( '"' + ltrim(s) + '"' )
|
|
qout( '"' + rtrim(s) + '"' )
|
|
qout( '"' + alltrim(s) + '"' )
|
|
|
|
return
|
|
|