[Fix]: fix a test in tests/run.src/fundamental.at (#279)

Author: yutaro-sakamoto

tests/run.src/fundamental.at

@@ -107,22 +107,33 @@ AT_CHECK([${COMPILE} prog.cob], [1], [],
 AT_CLEANUP
 
 AT_SETUP([Hexadecimal literal])
-AT_CHECK([${SKIP_TEST}])
 
-AT_DATA([dump.c], [
-#include <stdio.h>
-int dump (unsigned char *data);
-int dump (unsigned char *data)
-{
-  int i;
-  for (i = 0; i < 4; i++)
-    printf ("%02x", data[[i]]);
-  puts ("");
-  return 0;
+AT_DATA([dump.java], [
+import jp.osscons.opensourcecobol.libcobj.data.*;
+import jp.osscons.opensourcecobol.libcobj.call.*;
+
+public class dump implements CobolRunnable {
+  @Override
+  public int run(CobolDataStorage... argStorages) {
+      for(int i=0; i<3; ++i) {
+          System.out.printf("%02x", argStorages@<:@0@:>@.getByte(i));
+      }
+      System.out.println("");
+      return 0;
+  }
+
+  @Override
+  public void cancel() {
+  }
+
+  @Override
+  public boolean isActive() {
+    return false;
+  }
 }
 ])
 
-AT_CHECK([${CC} ${SHROPT} -o dump.${SHREXT} dump.c])
+AT_CHECK([javac dump.java])
 
 AT_DATA([prog.cob], [
        IDENTIFICATION   DIVISION.
@@ -138,7 +149,7 @@ AT_DATA([prog.cob], [
 AT_CHECK([${COMPILE} prog.cob])
 AT_CHECK([java prog], [0],
 [123
-00010200
+000102
 ])
 
 AT_CLEANUP