blob: b908885ead5f718a4ccc2d99fa229029466fe6cd (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
|
function Restore-NativeCommandStream
{ <#
.SYNOPSIS
This CmdLet gathers multiple ErrorRecord objects and reconstructs outputs
as a single line.
.DESCRIPTION
This CmdLet collects multiple ErrorRecord objects and emits one String
object per line.
.PARAMETER InputObject
A object stream is required as an input.
.PARAMETER Indent
Indentation string.
#>
[CmdletBinding()]
param(
[Parameter(ValueFromPipeline=$true)]
$InputObject
)
begin
{ $LineRemainer = "" }
process
{ if ($InputObject -is [System.Management.Automation.ErrorRecord])
{ if ($InputObject.FullyQualifiedErrorId -eq "NativeCommandError")
{ Write-Output $InputObject.ToString() }
elseif ($InputObject.FullyQualifiedErrorId -eq "NativeCommandErrorMessage")
{ $NewLine = $LineRemainer + $InputObject.ToString()
while (($NewLinePos = $NewLine.IndexOf("`n")) -ne -1)
{ Write-Output $NewLine.Substring(0, $NewLinePos)
$NewLine = $NewLine.Substring($NewLinePos + 1)
}
$LineRemainer = $NewLine
}
}
elseif ($InputObject -is [String])
{ Write-Output $InputObject }
else
{ Write-Host "Unsupported object in pipeline stream" }
}
end
{ if ($LineRemainer -ne "")
{ Write-Output $LineRemainer }
}
}
Write-Host ("ExecutionPolicy = {0}" -f (Get-ExecutionPolicy)) -ForegroundColor Yellow
Write-Host "List env:..." -ForegroundColor Yellow
dir env: | foreach { Write-Host (" {0}={1}" -f $_.Name,$_.Value) }
Write-Host "Print env:PATH..." -ForegroundColor Yellow
$env:PATH.Split(";") | foreach { Write-Host " $_" }
Write-Host "Print GCC setup..." -ForegroundColor Yellow
gcc.exe -v 2>&1 | Restore-NativeCommandStream | %{ "$_" }
Write-Host "Print GCC search directories..." -ForegroundColor Yellow
gcc.exe -print-search-dirs 2>&1 | Restore-NativeCommandStream | %{ "$_" }
if ($env:BUILD_BACKEND -eq "llvm")
{ Write-Host "Print CLang setup..." -ForegroundColor Yellow
clang.exe -v 2>&1 | Restore-NativeCommandStream | %{ "$_" }
Write-Host "Print CLang search directories..." -ForegroundColor Yellow
clang.exe -print-search-dirs 2>&1 | Restore-NativeCommandStream | %{ "$_" }
}
Write-Host "Print gnatls setup..." -ForegroundColor Yellow
gnatls.exe -v 2>&1 | Restore-NativeCommandStream | %{ "$_" }
|
