string-nth ( n string -- ch )

Vocabulary

strings.private

Inputs

n	a fixnum
string	a string

Outputs

ch	the character at the nth index

Word description

Unsafe string accessor, used to define nth on strings.

Warning
This word is in the strings.private vocabulary because it does not perform type or bounds checking. User code should call nth instead.

Definition

USING: alien.accessors kernel math.private ;

IN: strings.private

: string-nth ( n string -- ch )
    2dup string-nth-fast dup small-char?
    [ 2nip ] [
        [ (aux) alien-unsigned-2 7 fixnum-shift-fast ] dip
        fixnum-bitxor
    ] if ; inline