Usenet 1994 January/usenetsourcesnewsgroupsinfomagicjanuary1994.iso/sources/misc/volume2/pstrings/part01/newS.p

Text File | 1991-08-07 | 145 b | 14 lines

# include "strings.h"

procedure newS{(var s: String)};
{
* Initialises s to be the empty or null string ''
}
begin
    s := nil
end{ -- newS};