*** empty log message ***
[deliverable/binutils-gdb.git] / gdb / ada-exp.y
index 36ef3d48b08a866ceb6bc625d9f750bceb430be2..1a80b0b1fe49d6934c60d4b0ded832e3427cfabb 100644 (file)
@@ -1463,7 +1463,7 @@ convert_char_literal (struct type *type, LONGEST val)
   for (f = 0; f < TYPE_NFIELDS (type); f += 1)
     {
       if (strcmp (name, TYPE_FIELD_NAME (type, f)) == 0)
-       return TYPE_FIELD_BITPOS (type, f);
+       return TYPE_FIELD_ENUMVAL (type, f);
     }
   return val;
 }
This page took 0.024949 seconds and 4 git commands to generate.