summaryrefslogtreecommitdiff
path: root/src/hypervisor_check.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/hypervisor_check.ads')
-rw-r--r--src/hypervisor_check.ads2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/hypervisor_check.ads b/src/hypervisor_check.ads
index 3bb84be..3c62f5c 100644
--- a/src/hypervisor_check.ads
+++ b/src/hypervisor_check.ads
@@ -62,6 +62,7 @@ package Hypervisor_Check is
VirtualBox : constant String := "VirtualBox";
Parallels : constant String := "Parallels";
bhyve : constant String := "bhyve";
+ QEMU : constant String := "QEMU";
private
@@ -83,6 +84,7 @@ private
HyperV_DMI_Pattern : constant String := "Microsoft Corporation";
VirtualBox_DMI_Pattern : constant String := "innotek GmbH";
Parallels_DMI_Pattern : constant String := "Parallels";
+ QEMU_DMI_Pattern : constant String := "QEMU";
function CPUID (Arg : Unsigned_32) return CPUID_Registers;