diff --git a/src/test/create_testsuite b/src/test/create_testsuite
index 6bfa0a1be46c922e4a44483435c2ec990e5b3a7d..b79a1b3adc7a25d090cec30f92d06e685e771c2c 100755
--- a/src/test/create_testsuite
+++ b/src/test/create_testsuite
@@ -137,6 +137,11 @@ test_any(function bar=clone((program)"/test")->foo; return bar(),17)
 // sscanf
 test_any([[mixed a; return sscanf("11","%d",a)]],1)
 test_any([[mixed a; sscanf("11","%d",a); return a]],11)
+test_any([[mixed a; sscanf("11","%o",a); return a]],011)
+test_any([[mixed a; sscanf("11","%x",a); return a]],0x11)
+test_any([[mixed a; sscanf("11","%D",a); return a]],11)
+test_any([[mixed a; sscanf("0x11","%D",a); return a]],0x11)
+test_any([[mixed a; sscanf("011","%D",a); return a]],011)
 test_any([[mixed a,b; return sscanf("11foo","%dfoo",a)]],1)
 test_any([[mixed a,b; sscanf("11foo","%dfoo",a); return a]],11)
 test_any([[mixed a,b; return sscanf("11foo","%d%s",a,b)]],2)