fix typo error in test/while/while1-if.lua