We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent e2a80d8 commit c117aabCopy full SHA for c117aab
1 file changed
test/napif_test.f
@@ -63,7 +63,7 @@
63
DATA U_BUFFER /0,1,2,3,4,5,6/
64
EQUIVALENCE (CHAR_BUFFER, CHAR_BUFFER_B)
65
66
- IF (NXOPEN('NXtest.nxs', NXACC_CREATE, FILEID) .NE. NX_OK) STOP
+ IF (NXOPEN('NXtest.nxs', NXACC_CREATEXML, FILEID) .NE. NX_OK) STOP
67
IF (NXMAKEGROUP(FILEID, 'entry', 'NXentry') .NE. NX_OK) STOP
68
IF (NXOPENGROUP(FILEID, 'entry', 'NXentry') .NE. NX_OK) STOP
69
IF (NXMAKEDATA(FILEID, 'ch_data', NX_CHAR, 1, 10) .NE. NX_OK)
0 commit comments