Movatterモバイル変換

[0]ホーム
URL:

Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

 Sign up
Appearance settings

Commit7b544ff

Browse files
committed
Add/adjust tests
1 parent5ab7886 commit7b544ff

File tree

5 files changed

+141
-2
lines changed

5 files changed

+141
-2
lines changed

‎tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.bsl‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -68,7 +68,7 @@
6868
{
6969
}// end of method C::A2
7070

71-
.methodfamily specialname rtspecialname
71+
.methodpublic specialname rtspecialname
7272
instance void .ctor() cil managed
7373
{
7474
// Code size 10 (0xa)

‎tests/fsharpqa/Source/CodeGen/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04.il.netfx4.bsl‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -68,7 +68,7 @@
6868
{
6969
}// end of method C::A2
7070

71-
.methodfamily specialname rtspecialname
71+
.methodpublic specialname rtspecialname
7272
instance void .ctor() cil managed
7373
{
7474
// Code size 10 (0xa)
Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,8 @@
1+
// regression test for https://github.com/Microsoft/visualfsharp/issues/420
2+
3+
[<AbstractClass>]
4+
typeXpublic(i: int)=
5+
internalnew()= X(1)
6+
privatenew(f: float32)= X(1)
7+
8+
exit0
Lines changed: 129 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,129 @@
1+
2+
// Microsoft (R) .NET Framework IL Disassembler. Version 4.0.30319.1
3+
// Copyright (c) Microsoft Corporation. All rights reserved.
4+
5+
6+
7+
// Metadata version: v4.0.30319
8+
.assembly extern mscorlib
9+
{
10+
.publickeytoken= (B7 7A 5C561934 E089 )// .z\V.4..
11+
.ver4:0:0:0
12+
}
13+
.assembly extern FSharp.Core
14+
{
15+
.publickeytoken= (B0 3F 5F 7F11 D5 0A 3A )// .?_....:
16+
.ver4:4:0:9055
17+
}
18+
.assembly AbstractClass
19+
{
20+
.custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32,
21+
int32,
22+
int32)= (01000200000000000000000000000000 )
23+
24+
//
25+
// .custom instance void [mscorlib]System.Diagnostics.DebuggableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggableAttribute/DebuggingModes) = ( 01 00 01 01 00 00 00 00 )
26+
27+
.hash algorithm 0x00008004
28+
.ver0:0:0:0
29+
}
30+
.mresource public FSharpSignatureData.AbstractClass
31+
{
32+
// Offset: 0x00000000 Length: 0x00000308
33+
}
34+
.mresource public FSharpOptimizationData.AbstractClass
35+
{
36+
// Offset: 0x00000310 Length: 0x000000B1
37+
}
38+
.module AbstractClass.exe
39+
// MVID: {554AAD5A-333C-8BAF-A745-03835AAD4A55}
40+
.imagebase 0x00400000
41+
.file alignment 0x00000200
42+
.stackreserve 0x00100000
43+
.subsystem 0x0003// WINDOWS_CUI
44+
.corflags 0x00000001// ILONLY
45+
// Image base: 0x00AE0000
46+
47+
48+
// =============== CLASS MEMBERS DECLARATION ===================
49+
50+
.class public abstract auto ansi sealed AbstractClass
51+
extends [mscorlib]System.Object
52+
{
53+
.custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags)= (0100070000000000 )
54+
.class abstract auto ansi serializable nested public X
55+
extends [mscorlib]System.Object
56+
{
57+
.custom instance void [FSharp.Core]Microsoft.FSharp.Core.AbstractClassAttribute::.ctor()= (01000000 )
58+
.custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags)= (0100030000000000 )
59+
.method public specialname rtspecialname
60+
instance void .ctor(int32 i) cil managed
61+
{
62+
//
63+
.maxstack8
64+
.language '{AB4F38C9-B6E6-43BA-BE3B-58080B2CCCE3}', '{994B45C4-E6E9-11D2-903F-00C04FA302A1}', '{5A869D0B-6611-11D3-BD2A-0000F80849BD}'
65+
.line4,4 :6,7 'D:\\source\\repos\\latkinfsharp\\tests\\fsharpqa\\Source\\CodeGen\\EmittedIL\\Misc\\AbstractClass.fs'
66+
IL_0000: ldarg.0
67+
IL_0001: callvirt instance void [mscorlib]System.Object::.ctor()
68+
IL_0006: ldarg.0
69+
IL_0007: pop
70+
IL_0008: nop
71+
IL_0009: ret
72+
}// end of method X::.ctor
73+
74+
.method assembly specialname rtspecialname
75+
instance void .ctor() cil managed
76+
{
77+
//
78+
.maxstack8
79+
.line5,5 :22,26 ''
80+
IL_0000: nop
81+
IL_0001: ldarg.0
82+
IL_0002: ldc.i4.1
83+
IL_0003: callvirt instance void AbstractClass/X::.ctor(int32)
84+
IL_0008: ret
85+
}// end of method X::.ctor
86+
87+
.method assembly specialname rtspecialname
88+
instance void .ctor(float32 f) cil managed
89+
{
90+
//
91+
.maxstack8
92+
.line6,6 :32,36 ''
93+
IL_0000: nop
94+
IL_0001: ldarg.0
95+
IL_0002: ldc.i4.1
96+
IL_0003: callvirt instance void AbstractClass/X::.ctor(int32)
97+
IL_0008: ret
98+
}// end of method X::.ctor
99+
100+
}// end of class X
101+
102+
}// end of class AbstractClass
103+
104+
.class private abstract auto ansi sealed '<StartupCode$AbstractClass>'.$AbstractClass
105+
extends [mscorlib]System.Object
106+
{
107+
.field static assembly int32 init@
108+
.custom instance void [mscorlib]System.Diagnostics.DebuggerBrowsableAttribute::.ctor(valuetype [mscorlib]System.Diagnostics.DebuggerBrowsableState)= (0100000000000000 )
109+
.custom instance void [mscorlib]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor()= (01000000 )
110+
.custom instance void [mscorlib]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor()= (01000000 )
111+
.method public static void main@() cil managed
112+
{
113+
.entrypoint
114+
//
115+
.maxstack8
116+
.line8,8 :1,7 ''
117+
IL_0000: nop
118+
IL_0001: ldc.i4.0
119+
IL_0002: call !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::Exit<class [FSharp.Core]Microsoft.FSharp.Core.Unit>(int32)
120+
IL_0007: pop
121+
IL_0008: ret
122+
}// end of method $AbstractClass::main@
123+
124+
}// end of class '<StartupCode$AbstractClass>'.$AbstractClass
125+
126+
127+
// =============================================================
128+
129+
//

‎tests/fsharpqa/Source/CodeGen/EmittedIL/Misc/env.lst‎

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -52,3 +52,5 @@
5252

5353
# Note that unlike other codegen tests this requires --optimize+ since we're testing for the prescence of inlined code
5454
ReqPPSOURCE=LazyNoInline01.fs ISCFLAGS="-g --test:EmitFeeFeeAs100001 --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd LazyNoInline01.exe NetFx40"# LazyNoInline01.fs - NetFx40
55+
56+
SOURCE=AbstractClass.fs ISCFLAGS="-g --test:EmitFeeFeeAs100001 --optimize-" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd AbstractClass.exe"# AbstractClass.fs

0 commit comments

Comments
 (0)
[8]ページ先頭
©2009-2025 Movatter.jp