diff --git a/basis/xml-rpc/xml-rpc.factor b/basis/xml-rpc/xml-rpc.factor index 4c6570c4de..89463b77a4 100644 --- a/basis/xml-rpc/xml-rpc.factor +++ b/basis/xml-rpc/xml-rpc.factor @@ -18,8 +18,6 @@ M: integer item>xml [ "Integers must fit in 32 bits" throw ] unless [XML <-> XML] ; -UNION: boolean t POSTPONE: f ; - M: boolean item>xml "1" "0" ? [XML <-> XML] ;