Lout dislikes "type" inside a @Tag

Lout doesn't seem to like the word "type" to be a substring of a @Tag
value.  Here's how the attached example behaves:

 | $ lout -o test.ps -r3 test.lt
 | lout file "test.lt":
 |     10,1: unresolved cross reference @SectionList&&learn.to.touch.type.in.1hour
 |     10,1: unresolved cross reference @SectionList&&learn.to.touch.type.in.1hour
 |     10,1: unresolved cross reference @SectionList&&learn.to.touch.type.in.1hour
 |     10,1: unresolved cross reference @SectionList&&learn.to.touch.type.in.1hour
 |     10,1: no @ContentsPlace precedes or follows this @ContentsPlace&&foll_or_prec
 | lout:
 |         : lout -r beginning run 2:
 | lout:
 |         : lout -r beginning run 3:
 | lout file "test.ld":
 |    314,6: unresolved cross reference @PageMarker&&learn.to.touch.Minor.in.1hour
 |    314,6: unresolved cross reference @PageMarker&&learn.to.touch.Minor.in.1hour
 |    318,6: link name learn.to.touch.Minor.in.1hour has no destination point
 |    318,6: link name learn.to.touch.Minor.in.1hour has no destination point

Note that Lout seems to substitute "type" in
  "learn.to.touch.type.in.1hour"
with "Minor", resulting in
  "learn.to.touch.Minor.in.1hour".

This screws up the resulting pdfmark:

 | $ grep learn test.ps
 | [ /Rect [0 8802 8686 9055] /Border [0 0 0] /View [ /XYZ null null null ] /Subtype /Link /Dest /LOUTlearn_to_touch_Minor_in_1hour /ANN pdfmark
 | [ /Rect [9406 8946 9406 8946] /Border [0 0 0] /View [ /XYZ null null null ] /Subtype /Link /Dest /LOUTlearn_to_touch_Minor_in_1hour /ANN pdfmark
 | [ /Dest /LOUTlearn_to_touch_type_in_1hour /DEST pdfmark

Specifically, note that the /DEST pdfmark says

  /LOUTlearn_to_touch_type_in_1hour

but the corresponding /ANN pdfmark says

  /LOUTlearn_to_touch_Minor_in_1hour

Here's what I'm using:

 | $ lout -V
 | Basser Lout Version 3.36 (July 2007)
 | Basser Lout written by:      Jeffrey H. Kingston ([email protected])
 | Free source available from:  ftp://ftp.it.usyd.edu.au/jeff/lout
 | This executable compiled:    20:30:06 Jul 20 2008
 | System include directory:    /usr/share/lout/include
 | System database directory:   /usr/share/lout/data
 | Database index files created afresh automatically: yes
 | Safe execution (disabling system()) is default: no
 | strcoll() used for sorting by default: yes
 | PDF compression on: no
 | Debugging (-d, -dd, -ddd flags) available: no
 |
 | Basser Lout comes with ABSOLUTELY NO WARRANTY.
 | This is free software, and you are welcome to
 | redistribute it under certain conditions.  For
 | details on both points, consult the GNU General
 | Public License (distributed with this software).

What gives?

# -*- mode: text; fill-column: 79 -*-
# -*- buffer-file-coding-system: iso-8859-1 -*-
@Include{report}
@Report
  @Title {Test}
  @Author {Vadim}
  @CoverSheet {Yes}
//

@Section
  @Title {Learn to Touch-Type in One Hour}
  @Tag {learn.to.touch.type.in.1hour}
@Begin

@LP
foo

@End @Section

@SysInclude { langdefs }
@SysInclude { bsf }
@SysInclude { dsf }
@SysInclude { reportf }

@Use { @BasicSetup
  @DisplayIndent        { 2.00f @OrIfPlain 4s   }
  @ListOuterGap         { 0.8v @OrIfPlain 1f   }
  @ListGap              { 0.7v @OrIfPlain 1f    }
  @ListIndent           { 3s                    }
  @ListRightIndent      { 3s                    }
}

@Use { @DocumentSetup
  @PageType             { Letter @OrIfPlain Other}
  @MakeContents         { Yes }
  @FirstPageNumber      { 2 }
}

@Use { @ReportSetup
  @ContentsSeparate             { Yes }
  @TitleFont                    { Bold 14p      }
  @ContentsHeadingFont          { Bold 13p              }
  @SectionHeadingFont           { Bold 14p              }
  @ReferencesHeadingFont        { Bold 16p              }
  @SectionInContents            { Yes           }
  @SubSectionInContents         { Yes           }
  @SubSubSectionInContents      { Yes           }
}

@SysDatabase @FontDef  { fontdefs }
@Database @RefStyle    { refstyle }