$ factor test.factor 
test.factor

13: : <employee> ( -- employee ) employee new 40000 >>salary ;
                                                            ^
No word named “>>salary” found in current vocabulary search path