<mime-type type="text/x-erlang">
    <_comment>Erlang source code</_comment>
    <glob pattern="*.erl"/>
    <sub-class-of type="text/plain"/>
  </mime-type>

  <mime-type type="text/x-expect">
    <_comment>Expect Script</_comment>
    <glob pattern="*.exp"/>
    <sub-class-of type="text/plain"/>
  </mime-type>

  <mime-type type="text/x-forth">
    <_comment>Forth source code</_comment>

q.x          // (*(*q).T0).x        (*q).x is a valid field selector

p.M0()       // ((*p).T0).M0()      M0 expects *T0 receiver
p.M1()       // ((*p).T1).M1()      M1 expects T1 receiver
p.M2()       // p.M2()              M2 expects *T2 receiver
t.M2()       // (&t).M2()           M2 expects *T2 receiver, see section on Calls
</pre>

<p>
but the following is invalid:
</p>

<pre>