set-fourth ( fourth seq -- )

Vocabulary

sequences

Inputs

fourth	an object
seq	a sequence

Outputs

None

Word description

Sets the fourth element of a sequence.

Examples

USING: prettyprint kernel sequences ; { 1 2 3 4 } 5 over set-fourth .
{ 1 2 3 5 }

See also

set-first, set-second, set-third

Definition

USING: kernel ;

IN: sequences

: set-fourth ( fourth seq -- ) 3 swap set-nth ; inline