From: Bruno H. <ha...@il...> - 2000-06-22 18:38:10
|
Sam writes: > (stream-element-type g) > (OR (UNSIGNED-BYTE 16) (SIGNED-BYTE 8) (SIGNED-BYTE 8) CHARACTER) > > you can see (signed-byte 8) there twice. Which is not a bug. > I will write `type-eq', as we discussed in private, and put it into > type.lisp > (and pass it as :test to remove-duplicates) That's one possible optimization. Another approach is to write a general `simplify-type' function, which would return (OR (INTEGER -256 65535) CHARACTER) Bruno |