Changeset 2943

Timestamp:

Apr 13, 2012 7:01:36 AM (14 months ago)

Author:

quozl

Message:

disklabel - file spec parsing, avoid treating a-h as partition letter if UFS partition support is disabled.

File:

• ofw/disklabel/methods.fth (modified) (2 diffs)

ofw/disklabel/methods.fth

@@ -201 +201 @@
    then
 
+[ifdef] ufs-support
    \ If the first character is "a".."h", it's a UFS partition letter
    over c@ lcc  ascii a ascii h between  if  ( adr len )
@@ -207 +208 @@
       dup  0=  if  exit  then                ( adr len )
    then                                      ( adr len )
+[then]
 ;
 : parse-partition  ( -- )