Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Annotation of /tests/trunk/bugs/tests.obsolete/bug1155.3.sml
ViewVC logotype

Annotation of /tests/trunk/bugs/tests.obsolete/bug1155.3.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2460 - (view) (download)

1 : dbm 548 (* bug1155.3.sml *)
2 :    
3 :     signature S =
4 :     sig
5 :     type s
6 :     type t = s
7 :     end;
8 :    
9 :     functor F(Y: S) =
10 :     struct
11 :     open Y
12 :     end;
13 :    
14 :     structure A =
15 :     struct
16 :     structure B =
17 :     struct
18 :     type s = unit
19 :     type t = s
20 :     end
21 :     structure C : S = F(B)
22 :     end;

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0