write-c-string ( byte-array -- byte-array ) (original) (raw)

write-c-string ( byte-array -- byte-array )

Vocabulary
pack

Inputs

byte-array an object

Outputs

byte-array an object

Definition

USING: sequences ;

IN: pack

: write-c-string ( byte-array -- byte-array )
{ 0 } B{ } append-as ;