adoc/p_literal_string.adoc

   1 //compile.asm:  WORD p_literal_string,'S"',fasm ;; " (fool emacs)
   2
   3 anchor:p_literal_string[]
   4
   5 === Word: S"
   6
   7 ....
   8 Data stack: ( -- chars* n )
   9 ....
  10
  11 "S"" is a function word that pushes the [n:char] pointer for a string
  12 inlined subsequently to it in the containing definition. This is
  13 similar to <<p_lit,LIT>> but for a string literal.
  14
  15 ====
  16 .Word: LIT
  17 [caption='Definition concept {counter:exec}: ']
  18 ----
  19 : LIT R> DUP @ 2DUP + 8 + >R SWAP 8 + SWAP ;
  20 ----
  21 ====
  22
  23