There are device open functions out there in other toolkits which do the
same job without checking the TK2 defaults system.
Also, it's easy enough to do an error-trapped open_in on most systems,
whether you use WHEN ERRor (JS or later ROM), Q_ERR_ON (Qliberator
compiler), WHEN_ERROR and DEVICE_STATUS (Turbo compiler) just to name a few.
Dilwyn
-----Original Message-----
From: Ralf Reköndt
Sent: Tuesday, June 14, 2016 7:20 PM
To: ql-us...@q-v-d.com
Subject: Re: [Ql-Users] A feature or a bug?
It's really that awful, as OPEN tries the device you told it, then, if no
success, uses DATAD$ or somewhat others, DEV or such.
To be really successfull, you should set the SV_DATAD to "", keep the value
then try to open the device. This is the only way to see, if *that* device
is not present.
----- Original Message -----
From: "Marcel Kilgus" <ql-us...@mail.kilgus.net>
To: <ql-us...@q-v-d.com>
Sent: Tuesday, June 14, 2016 7:57 PM
Subject: Re: [Ql-Users] A feature or a bug?
François Van Emelen wrote:
So, this seems to be a feature... a very dangerous one : replacing DIR
f$ in line 30 with DELETE f$ would wipe all directories and files on
that device.
That would actually be a somewhat cool feature, but DELETE is not as
cool, so nothing will happen. Try it :) WDEL is a little bit more
dangerous, but it still asks nicely and like DELETE it will also fail
on directories.
Thing is this: FTEST = OPEN:CLOSE. OPEN can be used without a
parameter, in which case DATAD$ will be used. The same is therefore
true for FTEST. It's actually been this way since the release of TK2
which has been how long ago, 30 years or so?
All the best, Marcel
_______________________________________________
QL-Users Mailing List
-----
No virus found in this message.
Checked by AVG - www.avg.com
Version: 2016.0.7639 / Virus Database: 4604/12419 - Release Date: 06/14/16
-----
No virus found in this message.
Checked by AVG - www.avg.com
Version: 2016.0.7639 / Virus Database: 4604/12419 - Release Date: 06/14/16
_______________________________________________
QL-Users Mailing List
