let warning =
  "This code is automatically generated from the kernel database by kerneldb-to-parser program.  Any edits you make will be lost.";;
exception ParseError of string;;
type t = { dev_addr : string; name : string };;
let parser_1 bits = "parser_1";;
let parser_2 bits = "parser_2";;
let parser_3 bits = "parser_3";;
let parser_4 bits = "parser_4";;
let parser_5 bits = "parser_5";;
let parser_6 bits = "parser_6";;
let parser_7 bits = "parser_7";;
let parser_8 bits = "parser_8";;
let parser_9 bits = "parser_9";;
let parser_10 bits = "parser_10";;
let parser_11 bits = "parser_11";;
let parser_12 bits = "parser_12";;
let parser_13 bits = "parser_13";;
let parser_14 bits = "parser_14";;
let parser_15 bits = "parser_15";;
let parser_16 bits = "parser_16";;
let parser_17 bits = "parser_17";;
module StringMap = Map.Make(String);;
let map = StringMap.empty;;
let v = (parser_1, 1284);;
let map = StringMap.add "2.6.21-1.3128.fc7.i586" v map;;
let v = (parser_2, 1092);;
let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;;
let v = (parser_1, 1284);;
let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;;
let v = (parser_2, 1092);;
let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;;
let v = (parser_1, 1116);;
let map = StringMap.add "2.6.21-1.3228.fc7.i586" v map;;
let v = (parser_3, 1108);;
let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;;
let v = (parser_4, 2316);;
let map = StringMap.add "2.6.21-1.3236.fc8.x86_64" v map;;
let v = (parser_5, 1684);;
let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;;
let v = (parser_3, 1404);;
let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;;
let v = (parser_4, 2316);;
let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.x86_64" v map;;
let v = (parser_5, 1924);;
let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;;
let v = (parser_6, 2044);;
let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;;
let v = (parser_7, 1408);;
let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;;
let v = (parser_1, 1116);;
let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;;
let v = (parser_8, 2288);;
let map = StringMap.add "2.6.24-9.fc9.x86_64" v map;;
let v = (parser_6, 2044);;
let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;;
let v = (parser_1, 912);;
let map = StringMap.add "2.6.18-1.2798.fc6.i586" v map;;
let v = (parser_9, 1020);;
let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;;
let v = (parser_1, 912);;
let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;;
let v = (parser_8, 1752);;
let map = StringMap.add "2.6.25.11-97.fc9.x86_64" v map;;
let v = (parser_10, 672);;
let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;;
let v = (parser_11, 1244);;
let map = StringMap.add "2.6.24-9.fc9.i686" v map;;
let v = (parser_7, 1408);;
let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;;
let v = (parser_6, 2044);;
let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;;
let v = (parser_2, 1116);;
let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;;
let v = (parser_6, 2044);;
let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;;
let v = (parser_5, 1684);;
let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;;
let v = (parser_5, 1924);;
let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;;
let v = (parser_7, 1408);;
let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;;
let v = (parser_12, 2196);;
let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;;
let v = (parser_12, 2196);;
let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;;
let v = (parser_13, 1072);;
let map = StringMap.add "2.6.24-9.fc9.ppc" v map;;
let v = (parser_9, 672);;
let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;;
let v = (parser_9, 1020);;
let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;;
let v = (parser_7, 1408);;
let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;;
let v = (parser_12, 1540);;
let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;;
let v = (parser_9, 1020);;
let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;;
let v = (parser_5, 1924);;
let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;;
let v = (parser_14, 1984);;
let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;;
let v = (parser_9, 996);;
let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;;
let v = (parser_12, 1260);;
let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;;
let v = (parser_9, 996);;
let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;;
let v = (parser_9, 936);;
let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;;
let v = (parser_14, 1984);;
let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;;
let v = (parser_5, 1260);;
let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;;
let v = (parser_3, 2124);;
let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;;
let v = (parser_1, 912);;
let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
let v = (parser_12, 2196);;
let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;;
let v = (parser_5, 1260);;
let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;;
let v = (parser_2, 1116);;
let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;;
let v = (parser_2, 1092);;
let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;;
let v = (parser_12, 1260);;
let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;;
let v = (parser_1, 1284);;
let map = StringMap.add "2.6.21-1.3132.fc7.i586" v map;;
let v = (parser_1, 1284);;
let map = StringMap.add "2.6.21-1.3144.fc7.i586" v map;;
let v = (parser_12, 1660);;
let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;;
let v = (parser_5, 1260);;
let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;;
let v = (parser_15, 668);;
let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;;
let v = (parser_1, 1284);;
let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;;
let v = (parser_1, 1116);;
let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;;
let v = (parser_7, 1408);;
let map = StringMap.add "2.6.21-1.3209.fc8.i586" v map;;
let v = (parser_5, 1260);;
let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;;
let v = (parser_1, 1284);;
let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;;
let v = (parser_16, 1100);;
let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;;
let v = (parser_12, 1260);;
let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;;
let v = (parser_12, 1260);;
let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;;
let v = (parser_3, 2124);;
let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;;
let v = (parser_9, 688);;
let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;;
let v = (parser_11, 1244);;
let map = StringMap.add "2.6.24-9.fc9.i686" v map;;
let v = (parser_1, 924);;
let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
let v = (parser_11, 1212);;
let map = StringMap.add "2.6.25.11-97.fc9.i686" v map;;
let v = (parser_1, 1284);;
let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;;
let v = (parser_1, 1284);;
let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;;
let v = (parser_1, 1284);;
let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;;
let v = (parser_9, 996);;
let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;;
let v = (parser_1, 912);;
let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
let v = (parser_4, 2316);;
let map = StringMap.add "2.6.21-1.3209.fc8.x86_64" v map;;
let v = (parser_1, 912);;
let map = StringMap.add "2.6.20-1.2933.fc6.i586" v map;;
let v = (parser_3, 2124);;
let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;;
let v = (parser_1, 912);;
let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
let v = (parser_5, 1260);;
let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;;
let v = (parser_1, 912);;
let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;;
let v = (parser_9, 836);;
let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;;
let v = (parser_7, 1408);;
let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;;
let v = (parser_2, 1116);;
let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;;
let v = (parser_17, 668);;
let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
let v = (parser_11, 1244);;
let map = StringMap.add "2.6.24-9.fc9.i586" v map;;
let v = (parser_12, 2196);;
let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;;
let v = (parser_5, 1260);;
let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;;
let v = (parser_13, 1048);;
let map = StringMap.add "2.6.24-9.fc9.ppc" v map;;
let v = (parser_5, 1924);;
let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;;
let v = (parser_6, 2044);;
let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;;
let v = (parser_9, 688);;
let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;;
let v = (parser_7, 1408);;
let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;;
let v = (parser_1, 924);;
let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
let v = (parser_6, 2044);;
let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;;
type kernel_version = string;;
let known version = StringMap.mem version map;;
let size version = let (_, size) = StringMap.find version map in size;;
let get version bits =
  let (parsefn, _) = StringMap.find version map in parsefn bits;;