diff options
Diffstat (limited to 'src/hypervisor_check.adb')
| -rw-r--r-- | src/hypervisor_check.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/hypervisor_check.adb b/src/hypervisor_check.adb index 9923d27..4619b30 100644 --- a/src/hypervisor_check.adb +++ b/src/hypervisor_check.adb @@ -197,6 +197,8 @@ package body Hypervisor_Check is Vendor_Name := US.To_Unbounded_String (VirtualBox); elsif Contains (Vendor_String, Parallels_DMI_Pattern) then Vendor_Name := US.To_Unbounded_String (Parallels); + elsif Contains (Vendor_String, QEMU_DMI_Pattern) then + Vendor_Name := US.To_Unbounded_String (QEMU); else Vendor_Name := US.Null_Unbounded_String; end if; |