extra/help/syntax/syntax.factor

   1 ! Copyright (C) 2005, 2008 Slava Pestov.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: arrays kernel parser sequences words help help.topics
   4 namespaces vocabs definitions compiler.units ;
   5 IN: help.syntax
   6
   7 : HELP:
   8     scan-word bootstrap-word
   9     dup set-word
  10     dup >link save-location
  11     \ ; parse-until >array swap set-word-help ; parsing
  12
  13 : ARTICLE:
  14     location >r
  15     \ ; parse-until >array [ first2 ] keep 2 tail <article>
  16     over add-article >link r> remember-definition ; parsing
  17
  18 : ABOUT:
  19     scan-object
  20     in get vocab
  21     dup +inlined+ changed-definition
  22     set-vocab-help ; parsing