[Midnightbsd-cvs] src [9853] trunk/sys/boot/forth/vm.4th: remove vm.4th

[laffer1 at midnightbsd.org]

Revision: 9853
          http://svnweb.midnightbsd.org/src/?rev=9853
Author:   laffer1
Date:     2018-05-22 23:00:40 -0400 (Tue, 22 May 2018)
Log Message:
-----------
remove vm.4th

Removed Paths:
-------------
    trunk/sys/boot/forth/vm.4th

Deleted: trunk/sys/boot/forth/vm.4th
===================================================================
--- trunk/sys/boot/forth/vm.4th	2018-05-23 03:00:13 UTC (rev 9852)
+++ trunk/sys/boot/forth/vm.4th	2018-05-23 03:00:40 UTC (rev 9853)
@@ -1,35 +0,0 @@
-: check-env? ( addr len addr len -- flag )
-	getenv
-	dup -1 <> if
-		compare 0= if
-			true exit
-		then
-	else
-		drop
-		2drop
-	then
-	false
-;
-
-: is-vm? ( -- flag )
-	s" QEMU  " s" hint.acpi.0.oem" check-env? if
-		true exit
-	then
-	s" VBOX  " s" hint.acpi.0.oem" check-env? if
-		true exit
-	then
-	s" VMware, Inc." s" smbios.system.maker" check-env? if
-		true exit
-	then
-	s" Parallels Software International Inc." s" smbios.bios.vendor"
-	    check-env? if
-		true exit
-	then
-	false
-;
-
-: setup-vm
-	is-vm? if
-		s" 100" s" hz" setenv
-	then
-;