~helfrich/+junk/rmutt-package

« back to all changes in this revision

Viewing changes to examples/story.rm

  • Committer: Serge Helfrich
  • Date: 2015-08-22 09:57:38 UTC
  • Revision ID: serge.helfrich@gmail.com-20150822095738-4uov4m00j2dkuyos
Tags: upstream-0.1.3
ImportĀ upstreamĀ versionĀ 0.1.3

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#include "dialogue.rm"
 
2
 
 
3
story: (
 
4
  ((description|dialogue.dialogue)>util.xcap){10,20}
 
5
);
 
6
 
 
7
description: (
 
8
  desc_clause ".\n" |
 
9
  desc_clause ", " grammar.cc " " desc_clause ".\n"
 
10
);
 
11
 
 
12
desc_clause: (
 
13
  grammar.det_np_s " "
 
14
    ("was""n't"?|("had""n't"?|("c"|"sh"|"w")"ould""n't"?" have")" been")
 
15
    " "
 
16
    eng.verb_past_part (" " eng.adv|", " fwiw)? |
 
17
  (dialogue.sub_clause ", ")? dialogue.statement
 
18
);
 
19
 
 
20
fwiw: (
 
21
  "for once"|"at long last"|"for a change"|
 
22
  "as a matter of fact"|"if you must know"|
 
23
  "if you can believe that"|"for what it's worth"|
 
24
  "for instance"
 
25
);
 
26
 
 
27
 
 
28