1// { dg-do assemble  }
2// Copyright (C) 2000 Free Software Foundation
3// Contributed by Nathan Sidwell 21 June 2000 <nathan@codesourcery.com>
4
5// Origin GNATS bug report 136 from
6// language specific constants caused the backend's constant caching machinery
7// to fall over.
8
9struct A {
10  const char *name;
11  int reserved;
12  int a;
13  int b;
14  void (A::*func)();
15  void Fn ();
16};
17
18void Interpret() {
19  struct A cmd_list =
20    {"a",0,0, 0,&A::Fn}
21  ;
22}
23