02 立即詞

: <table  \ comp: ( -<string">- ) run: ( -- addr len )

  STATE @            \  0: 執行態  非0: 編譯態

  IF      

   COMPILE  (S>) ,>

   COMPILE .<table                  

  ELSE    

   _<table 

   THEN 

  ; IMMEDIATE