diff options
| author | Daniil Baturin <daniil@baturin.org> | 2015-04-06 16:40:03 +0600 |
|---|---|---|
| committer | Daniil Baturin <daniil@baturin.org> | 2015-04-06 16:40:03 +0600 |
| commit | 29a9fc9af63a4c897ac718894f8f01bb50a38104 (patch) | |
| tree | 7f08887e689aecb4ae99a1dd29220e47fded88a1 /src/hypervisor_check.ads | |
| parent | 74c860906f9ae73f194341feda41436f959521d5 (diff) | |
| download | hvinfo-29a9fc9af63a4c897ac718894f8f01bb50a38104.tar.gz hvinfo-29a9fc9af63a4c897ac718894f8f01bb50a38104.zip | |
Add VirtualBox PCI detection on FreeBSD.
Diffstat (limited to 'src/hypervisor_check.ads')
| -rw-r--r-- | src/hypervisor_check.ads | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/hypervisor_check.ads b/src/hypervisor_check.ads index f4b1eef..3941f8f 100644 --- a/src/hypervisor_check.ads +++ b/src/hypervisor_check.ads @@ -30,6 +30,8 @@ package Hypervisor_Check is function Command_Succeeds (Command : Interfaces.C.Char_Array) return Boolean; + function VirtualBox_PCI_Present return Boolean; + -- Vendor names for human consumption VMWare : constant String := "VMWare"; Xen_HVM : constant String := "Xen HVM"; |