Date: Mon, 10 Dec 2012 15:29:56 +0000 (UTC) From: Devin Teske <dteske@FreeBSD.org> To: src-committers@freebsd.org, svn-src-all@freebsd.org, svn-src-head@freebsd.org Subject: svn commit: r244089 - head/sys/boot/forth Message-ID: <201212101529.qBAFTuV2044742@svn.freebsd.org>
next in thread | raw e-mail | index | archive | help
Author: dteske Date: Mon Dec 10 15:29:56 2012 New Revision: 244089 URL: http://svnweb.freebsd.org/changeset/base/244089 Log: Add support for comma-separated values (whitespace-separated still supported). PR: conf/121064 Submitted by: koitsu Reviewed by: jh Modified: head/sys/boot/forth/support.4th Modified: head/sys/boot/forth/support.4th ============================================================================== --- head/sys/boot/forth/support.4th Mon Dec 10 14:37:18 2012 (r244088) +++ head/sys/boot/forth/support.4th Mon Dec 10 15:29:56 2012 (r244089) @@ -207,20 +207,20 @@ create last_module_option sizeof module. dup 0= if 2drop 2drop false exit then begin begin - swap dup c@ dup 32 = over 9 = or - over 10 = or over 13 = or swap drop + swap dup c@ dup 32 = over 9 = or over 10 = or + over 13 = or over 44 = or swap drop while 1+ swap 1- repeat swap 2 pick 1- over < while 2over 2over drop over compare-insensitive 0= if 2 pick over = if 2drop 2drop true exit then 2 pick tuck - -rot + swap over c@ dup 32 = - over 9 = or over 10 = or over 13 = or + over 9 = or over 10 = or over 13 = or over 44 = or swap drop if 2drop 2drop true exit then then begin - swap dup c@ - dup 32 = over 9 = or over 10 = or over 13 = or - swap drop if false else true then 2 pick 0> and + swap dup c@ dup 32 = over 9 = or over 10 = or + over 13 = or over 44 = or swap drop + if false else true then 2 pick 0> and while 1+ swap 1- repeat swap repeat
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201212101529.qBAFTuV2044742>