asda?‰PNG  IHDR ? f ??C1 sRGB ??é gAMA ±? üa pHYs ? ??o¨d GIDATx^íüL”÷e÷Y?a?("Bh?_ò???¢§?q5k?*:t0A-o??¥]VkJ¢M??f?±8\k2íll£1]q?ù???T GOOF----LE-8-2.0 ]=4h] gguile  gdefine-module*   ggdb gtypes  gfilenameS f gdb/types.scm gimportsS    giterator   gsupport     gset-current-module   gtype-has-field? giterator-until gfield-baseclass? g field-type gendS gmake-field-iterator g type-code g TYPE_CODE_REF g type-target !gtype-strip-typedefs "g assert-type #gmemq $gTYPE_CODE_STRUCT %gTYPE_CODE_UNION &gSCM_ARG1 'gtype-has-field-deep? (fstruct or union )gcall-with-deferred-observers *) +) ,gmodule-export! -, ., /gcurrent-module 0/ 1/ 2' 3gTYPE_CODE_ENUM 4gmake-enum-hashtable 5fenum 6gmake-hash-table 7gfor-each 8g hash-set! 9g field-name :g field-enumval ;g type-fields <4C5h a]4   54>"Gh ]45$ L456Cgfield  gfilenamef gdb/types.scm #   $ # $   % 1  % #   gnamegfind-in-baseclassCh0] 4L5$C4LO455Cgtype  .gt .gfilenamef gdb/types.scm "   - -   +  ! ,  ) +  , .  - .   . gnameg search-classC !"#$%&'( hp] HOQ4J5$ 4J5K"4J5K444J5 5J   >"GJ6gtype  kg field-name  kg search-class   kgfilenamef gdb/types.scm   0 0  $ 0  % 1  - 1  2 2 : 2  ; 4  > 4  A 4  N 4 & P 4  V 5  X 5 3 ] 4  k 7   k gnamegtype-has-field-deep?g documentationfUReturn #t if the type, including baseclasses, has the specified field. Arguments: type: The type to examine. It must be a struct or union. field-name: The name of the field to look up. Returns: True if the field is present either in type_ or any baseclass. Raises: wrong-type-arg: The type is not a struct or union.C'R4+.12h?]4567gfilenamef gdb/types.scm    C>"G"3&456789:hk]L45456cgenum  gfilenamef gdb/types.scm J   K  K 2  K    C; hP] 445>"G454 O4 5>"GCg enum-type  Lghtab ) Lgfilenamef gdb/types.scm 9  G   G   G   H "  H 7  G  % I  ) I  , J  6 L  A J   L gnamegmake-enum-hashtableg documentationfReturn a hash table from a program's enum type. Elements in the hash table are fetched with hashq-ref. Arguments: enum-type: The enum to compute the hash table for. Returns: The hash table of the enum. Raises: wrong-type-arg: The type is not an enum.C4R+.1<h?]4567gfilenamef gdb/types.scm 9   C6Ygm  (gfilenamef gdb/types.scm      9    C6