Guidance Forums / Reginald Rexx / Bug in CHARIN-Guidance指路人

Guidance
指路人
g.yi.org

Guidance Forums / Reginald Rexx / Bug in CHARIN

Home

Software

Upload

回顶部

⇑

Forum List • Thread List • Reply • Refresh • New Topic • Search • Previous • Next

1. Bug in CHARIN

#13607

Posted by: Michael S 2012-06-02 19:52:21

I think I've discovered a bug in CHARIN.

I've attached a file that can be used together with the test script. Basically, it seems that if you've read x bytes from a file and then try and reset the pointer back to byte 1, the next read always starts reading from byte 2. If you try and set the pointer to 0 then charin complains. Try the following script using the attached file.

test_charin.rex

test_file.DAT

#13608

Posted by: Jeff Glatt 2012-06-06 07:37:51

Not a bug. You're not using CHARIN correctly. Here's the docs for the third arg

length indicates the requested number of characters to read in. If 0, then CHARIN() merely sets the "read character position" to position without reading any characters and returns an empty string. (ie, Similiar to using STREAM's SEEK). If length is omitted, CHARIN() defaults to reading only 1 character.

So your line...

temp = CHARIN(ansi_filein, 1)

... sets the position to 1 and then also reads the first char. Obviously, the next CHARIN will start at the second char (unless you supply another position). Try...