Add ws string init from str

targets #350 
You can put the lines 112 to 118 into two lines:

```C
ws_object_unlick(&self->obj);
return !!self->str;
```