🚀 go-pugleaf

dcollier@cix.compulink.co.uk ("David Collier") wrote:

>Binary IO in M2...

>How about something like ( JPI anyway ):

>TYPE RealBinaryType = ARRAY [ 0 .. SIZE(REAL) - 1 ] OF BYTE ;

>VAR F : REAL ;

>PROCEDURE WriteRealInBinary(  ..... RealNumber : REAL ) ;
>BEGIN
>FIO.WrBin(File , RealBinaryType( RealNumber ) , Size( RealBinaryType )) ;
>END WriteRealInBinary ;
>________

>Sorry, lots of details missing, it's late. But the tools are all very 
>simple.

>Of course it is easier if you can write/read complete records, with all 
>the fields set up. It becomes one call to FIO for lots of variables.

But in JPI you don't need to do that! ARRAY OF BYTE is
assignhment-compatible with *anything*. So you just need to (in your
example):

FIO.WrBin(File, F);

and so on for any other type, structured or not.


Martin Rand            | Tel: (44) 1703 252445 |
Highfield Software Ltd | Fax: (44) 1703 252445 |
Southampton, UK        |                       |