📄 tihxfile.in
字号:
# ************* DataFile Tests *************# *** Operations on unbound file ***GetLastErrorCode OKDelete FAILName FAILIsOpen FALSEClose OKFlush FAILOpen "wb" FAILOpen "rb" FAILCreate "wb" FAILCreate "rb" FAILRead 20 FAILWrite HelloWorld FAILStat FAILTellGetLastErrorCode FAIL# *** Bind ***Bind FakeFile.txtName OK FakeFile.txt# *** Rebind ***Bind TestFile.txtName OK TestFile.txt# *** Open-Create ***Create wb OKIsOpen TRUEName OK TestFile.txt# *** Close and close againClose OKIsOpen FALSEName OK TestFile.txtClose OKClose OK# *** Open ***Open rwb OKIsOpen TRUEName OK TestFile.txtClose OK# *** Write on Closed File ***Write HelloWorld FAILWrite NeverSayNeverAgain FAIL# *** Open ***Open rwb OKIsOpen TRUEName OK TestFile.txt# *** Write on Open File ***Write HelloWorld OKWrite NeverSayNeverAgain OKFlush OK# *** Stat ***Stat OK 28# *** Seek/Read/Tell ***Seek 2 SET OKRead 3 OK lloTell 5Seek 2 CUR OKTell 7Read 3 OK rldSeek -5 CUR OKTell 5Stat OK 28Read 5 OK WorldTell 10Seek -5 END OKTell 23Read 5 OK AgainTell 28Stat OK 28# *** Flush on Open File ***Flush OKFlush OKFlush OKStat OK 28# *** EOF Read ***Read 3 FAILRead 5 FAILRead 23 FAIL# *** Partial EOF Read ***Seek -3 END OKRead 5 OK ainTell 28Stat OK 28# *** Close ***Close OKIsOpen FALSEName OK TestFile.txt# *** Stat unbound file ***Stat OK 28# *** Flush on Closed File ***Flush FAILFlush FAILFlush FAIL# *** Delete Closed File ***Delete OK# *** Open non-existent file ***Open rb FAILOpen rwb FAILOpen w FAIL# *** Open for read/write ***Create rwb OK# *** Write ***Write HelloWorld OK# *** Delete Open File ***Delete OKIsOpen FALSE# *** Open for read/write ***Open rwb FAILIsOpen FALSECreate rwb OKWrite HelloWorld OKFlush OKStat OK 10# *** Re-open test ***Open rb OKTell 0Stat OK 10GetLastErrorStringClose OKClose OK# *** Create-NoTrunc test ***Create rwbn FAILCreate rwn FAILCreate rbn FAILCreate wbn FAILCreate rn FAILCreate wn FAIL# *** Blast test ***Create wb OKStat OK 0Write HelloWorld OKFlush OKStat OK 10Delete OKOpen rb FAIL# *** CHX Data file tests ***# *** Get Temp File Name ***GetTempNameCreate rwb OKGetTempNameWrite HelloWorld OKFlush OK# *** Rewind Test ***Rewind OKRead 5 OK HelloRewind OKRead 5 OK HelloClose OKRewind FAILRewind FAIL# *** Delete name test ***Delete TestFile.txt OKDelete TestFile.txt FAILDelete TestFIle.txt FAILOpen rb FAIL
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -