Skip to content

Commit a194c86

Browse files
committed
Show path of expected sigdata
1 parent 4107011 commit a194c86

File tree

2 files changed

+11
-11
lines changed

2 files changed

+11
-11
lines changed

src/fsharp/CompileOps.fs

Lines changed: 7 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -3605,8 +3605,8 @@ type RawFSharpAssemblyDataBackedByFileOnDisk (ilModule: ILModuleDef, ilAssemblyR
36053605
member __.GetRawFSharpSignatureData(m,ilShortAssemName,filename) =
36063606
let resources = ilModule.Resources.AsList
36073607
let sigDataReaders =
3608-
[ for iresource in resources do
3609-
if IsSignatureDataResource iresource then
3608+
[ for iresource in resources do
3609+
if IsSignatureDataResource iresource then
36103610
let ccuName = GetSignatureDataResourceName iresource
36113611
let byteReader = iresource.GetByteReader(m)
36123612
yield (ccuName, byteReader()) ]
@@ -3615,9 +3615,9 @@ type RawFSharpAssemblyDataBackedByFileOnDisk (ilModule: ILModuleDef, ilAssemblyR
36153615
if List.contains ilShortAssemName externalSigAndOptData then
36163616
let sigFileName = Path.ChangeExtension(filename, "sigdata")
36173617
if not sigDataReaders.IsEmpty then
3618-
error(Error(FSComp.SR.buildDidNotExpectSigdataResource(),m))
3619-
if not (FileSystem.SafeExists sigFileName) then
3620-
error(Error(FSComp.SR.buildExpectedSigdataFile(), m))
3618+
error(Error(FSComp.SR.buildDidNotExpectSigdataResource(FileSystem.GetFullPathShim filename),m))
3619+
if not (FileSystem.SafeExists sigFileName) then
3620+
error(Error(FSComp.SR.buildExpectedSigdataFile (FileSystem.GetFullPathShim sigFileName), m))
36213621
[ (ilShortAssemName, FileSystem.ReadAllBytesShim sigFileName)]
36223622
else
36233623
sigDataReaders
@@ -3632,9 +3632,9 @@ type RawFSharpAssemblyDataBackedByFileOnDisk (ilModule: ILModuleDef, ilAssemblyR
36323632
if List.contains ilShortAssemName externalSigAndOptData then
36333633
let optDataFile = Path.ChangeExtension(filename, "optdata")
36343634
if not optDataReaders.IsEmpty then
3635-
error(Error(FSComp.SR.buildDidNotExpectOptDataResource(),m))
3635+
error(Error(FSComp.SR.buildDidNotExpectOptDataResource(FileSystem.GetFullPathShim filename),m))
36363636
if not (FileSystem.SafeExists optDataFile) then
3637-
error(Error(FSComp.SR.buildExpectedFileAlongSideFSharpCore(optDataFile),m))
3637+
error(Error(FSComp.SR.buildExpectedFileAlongSideFSharpCore(optDataFile,FileSystem.GetFullPathShim optDataFile),m))
36383638
[ (ilShortAssemName, (fun () -> FileSystem.ReadAllBytesShim optDataFile))]
36393639
else
36403640
optDataReaders

src/fsharp/FSComp.txt

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1063,10 +1063,10 @@ lexIndentOffForML,"Consider using a file with extension '.ml' or '.mli' instead"
10631063
1220,chkNoReflectedDefinitionOnStructMember,"ReflectedDefinitionAttribute may not be applied to an instance member on a struct type, because the instance member takes an implicit 'this' byref parameter"
10641064
1221,tcDllImportNotAllowed,"DLLImport bindings must be static members in a class or function definitions in a module"
10651065
1222,buildExplicitCoreLibRequiresNoFramework,"When mscorlib.dll or FSharp.Core.dll is explicitly referenced the %s option must also be passed"
1066-
1223,buildExpectedSigdataFile,"FSharp.Core.sigdata not found alongside FSharp.Core"
1067-
1224,buildDidNotExpectOptDataResource,"Did not expect to find optdata resource in FSharp.Core.dll"
1068-
1225,buildExpectedFileAlongSideFSharpCore,"File '%s' not found alongside FSharp.Core"
1069-
1226,buildDidNotExpectSigdataResource,"Did not expect to find sigdata resource in FSharp.Core.dll"
1066+
1223,buildExpectedSigdataFile,"FSharp.Core.sigdata not found alongside FSharp.Core. File expected in %s."
1067+
1224,buildDidNotExpectOptDataResource,"Did not expect to find optdata resource in FSharp.Core.dll at %s."
1068+
1225,buildExpectedFileAlongSideFSharpCore,"File '%s' not found alongside FSharp.Core. File expected in %s."
1069+
1226,buildDidNotExpectSigdataResource,"Did not expect to find sigdata resource in FSharp.Core.dll at %s."
10701070
1227,buildUnexpectedFileNameCharacter,"Filename '%s' contains invalid character '%s'"
10711071
1228,tcInvalidUseBangBinding,"'use!' bindings must be of the form 'use! <var> = <expr>'"
10721072
1230,crefNoInnerGenericsInQuotations,"Inner generic functions are not permitted in quoted expressions. Consider adding some type constraints until this function is no longer generic."

0 commit comments

Comments
 (0)