Question about deferred words

[Craig Lindley]

I am trying to dynamically resolve deferred words as follows:

defer PRINTWORD

: print1 ." print1" cr ;

: print2 ." print2" cr ;

: p1test
  ' print1 is PRINTWORD
  PRINTWORD
;

: p2test
  ' print2 is PRINTWORD
  PRINTWORD
;

So when I call p1test the deferred word should be resolved and when PRINTWORD is called, print1 should print "print1". Unfortunately what I get is:

> p1test ' could not find Stack<10>
THROW code = -13
Undefined word!

[Helmut Eller]

You probably want to use ['] instead of '. ['] reads the name at
compile time, while ' reads the name at runtime.

Helmut

[Craig Lindley]

I figured this out. Instead of using tick, I must use ['] and then things work

Sorry for the noise