1\ Copyright (c) 2006-2012 Devin Teske <dteske@FreeBSD.org> 2\ All rights reserved. 3\ 4\ Redistribution and use in source and binary forms, with or without 5\ modification, are permitted provided that the following conditions 6\ are met: 7\ 1. Redistributions of source code must retain the above copyright 8\ notice, this list of conditions and the following disclaimer. --- 8 unchanged lines hidden (view full) --- 17\ FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 18\ DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 19\ OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 20\ HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 21\ LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 22\ OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 23\ SUCH DAMAGE. 24\ |
25\ $FreeBSD: head/sys/boot/forth/menu-commands.4th 242667 2012-11-06 19:26:36Z dteske $ |
26 27marker task-menu-commands.4th 28 |
29include /boot/menusets.4th 30 |
31variable kernel_state 32variable root_state 33 34: acpi_enable ( -- ) 35 s" set acpi_load=YES" evaluate \ XXX deprecated but harmless 36 s" set hint.acpi.0.disabled=0" evaluate 37 s" loader.acpi_disabled_by_user" unsetenv 38; --- 181 unchanged lines hidden (view full) --- 220 221 s" set root=${root_prefix}${root[N]}${root_suffix}" 222 \ command to assemble root image-path 223 -rot tuck 30 + c! swap \ replace 'N' with array index value 224 evaluate \ sets $kernel to full kernel-path 225 226 TRUE \ loop menu again 227; |
228 229: goto_menu ( N M -- N TRUE ) 230 menu-unset 231 menuset-loadsetnum ( n m -- n ) 232 menu-redraw 233 TRUE \ Loop menu again 234; |