7 lines
123 B
Text
7 lines
123 B
Text
|
Cat: procedure options (main);
|
||
|
|
declare s character (100) varying;
|
||
|
|
s = 'dust ';
|
||
|
|
s ||= 'bowl';
|
||
|
|
put (s);
|
||
|
|
end Cat;
|