anchor.diff:      tliteral
   ;
   
  +
  +: opticompile,  \ Classic compilation gives no pathological cases.
  +  compile,       \ Cannot handle this in compile, as some of the pathological cases use compile, themselves.
  +  true fineforoptimisation _!
  +;
  +
  +\ Literals are fine for optimisation, too, but currently no optimisation cases handle literals.
  +
  +: optiexecute   \ All pathological conditions are caused by immediate definitions.
  +  execute
  +  fineforoptimisation off
  +;
  +
   : dispatch
       jumptable ;fallthru
       jmp execute                 \      -1      0       non-immediate
       jmp doubleAlso              \      0       0       number
       jmp execute                 \      1       0       immediate
   
  -    jmp compile,                \      -1      2       non-immediate
  +    jmp opticompile,            \      -1      2       non-immediate
       jmp doubleAlso,             \      0       2       number
  -    jmp execute                 \      1       2       immediate
  +    jmp optiexecute             \      1       2       immediate
   
   : interpret
       begin
  
positive.code: \     inline: exit
  \ ;
  
  header-imm exit
  : texit
      inline: exit
  ;
  
  
negative.code: 
  header ]
  : t]
      fineforoptimisation off  \  : --> No opcodes written yet - never recognize header bytes as opcodes !
      d# 3                      \ ] --> Something strange might just went on. Careful !
  ;fallthru
  : state!
      state _!
  