Create scanner_test.ml