File: bug_2108.v

package info (click to toggle)
coq 8.20.1%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 44,116 kB
  • sloc: ml: 234,160; sh: 4,301; python: 3,270; ansic: 2,644; makefile: 882; lisp: 172; javascript: 63; xml: 24; sed: 2
file content (22 lines) | stat: -rw-r--r-- 407 bytes parent folder | download | duplicates (12) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
(* Declare Module in Module Type *)
Module Type A.
Record t : Set := { something : unit }.
End A.


Module Type B.
Declare Module BA : A.
End B.


Module Type C.
Declare Module CA  : A.
Declare Module CB : B with Module BA := CA.
End C.


Module Type D.
Declare Module DA : A.
(* Next line gives: "Anomaly: uncaught exception Not_found. Please report." *)
Declare Module DC : C with Module CA := DA.
End D.