xml-rpc: removing unnecessary union.
parent
2d3f46acf4
commit
85a198e68e
|
@ -18,8 +18,6 @@ M: integer item>xml
|
||||||
[ "Integers must fit in 32 bits" throw ] unless
|
[ "Integers must fit in 32 bits" throw ] unless
|
||||||
[XML <i4><-></i4> XML] ;
|
[XML <i4><-></i4> XML] ;
|
||||||
|
|
||||||
UNION: boolean t POSTPONE: f ;
|
|
||||||
|
|
||||||
M: boolean item>xml
|
M: boolean item>xml
|
||||||
"1" "0" ? [XML <boolean><-></boolean> XML] ;
|
"1" "0" ? [XML <boolean><-></boolean> XML] ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue