fix recent mon.c warning

mon.c(967) : warning C4244: '=' : conversion from 'long ' to 'char ',
possible loss of data

diff --git a/src/mon.c b/src/mon.c
index 71769658ebf2e1d667ef1aba42c5dc3133a8f960..8b04754d62d58b976563691c653b08bd1abcad7a 100644 (file)
--- a/src/mon.c
+++ b/src/mon.c
@@ -964,7 +964,7 @@ mfndpos(mon, poss, info, flag)
        poolok = is_flyer(mdat) || is_clinger(mdat) ||
                 (is_swimmer(mdat) && !wantpool);
        lavaok = is_flyer(mdat) || is_clinger(mdat) || likes_lava(mdat);
-       thrudoor = (flag & (ALLOW_WALL|BUSTDOOR));
+       thrudoor = ((flag & (ALLOW_WALL|BUSTDOOR)) != 0L);
        if (flag & ALLOW_DIG) {
            struct obj *mw_tmp;