(j3.2006) UK10 paper
Tue Oct 1 17:23:53 EDT 2013
check_non_ascii: do i = 1, max_text_len
found_non_ascii: if( .not. ( ichar( blank) <= ichar( line( i: i)) &
.and. ( code_del > ichar( line( i: i)) )) )then
stop 'ERROR: non-ASCII character'
end if found_non_ascii
end do check_non_ascii
On Oct 1, 2013, at 10:42 , David Muxworthy <d.muxworthy at bcs.org.uk> wrote:
> On 1 Oct 2013,Dan Nagle wrote:
>> It's in the edit at 440:15, between the ( and the "
> No wonder I couldn't find it. I was looking for codes
> outside 00 to 7f and that is 0f. Which ASCII codes are
> considered to be non-ASCII?
> J3 mailing list
> J3 at mailman.j3-fortran.org
More information about the J3