Adds grammar for dianzhu

[dianzhuhui/script.git] / lib / dianzhu.citrus

# 標点の文法(点注会)

grammar Dianzhu
  rule sentence_seq
    ( sentence+ )
  end
  rule sentence
    (((phrase '：' quotation) | quotation | phrase_seq )+ fullstop)
  end

  # 引用はネストしない
  rule quotation
    ( '「' phrase_seq '」' )
  end

  # 説解用
  rule sentence_part
    ( sentence_seq? (phrase_seq punctuation)? )
  end
#  rule phrase_seq
#    ( phrase (punctuation phrase)* )
#  end 

  rule phrase_seq
    ( phrases | phrase )
  end
  rule phrases
    ( phrase punctuation seq:(phrases | phrase) ) {
      phrase.value + punctuation.value + seq.value
    }
  end

#  rule phrase
#    ( word+ )
#  end
  rule phrase
    ( words | word )
  end
  rule words
    ( word seq:(words | word) ) { word.value + seq.value }
  end

  rule word
   ( object | text )
  end
  rule object
    ('[' command ':' text ']') {
        command.value + "{" + text + "}"
    }
  end
  rule command
     ( book | chapter | person | fanqie | rime_group )
  end
  rule book
    'bk' { "\book" }
  end
  rule chapter
    'ch' { "\chap" }
  end
  rule person
    'p' { "\pers" }
  end

  # terminals
  rule text
    /[^《》〈〉【】「」。，、：；？！\[\]:a-z]+/u  # TODO: 半角を除く \W
  end
  rule punctuation
    /[，、：；]/u
  end
  rule fullstop
    /[。]/u
  end
end