Re: [BLACKBOX] [Fwd: Re: [BLACKBOX] Another trap during compile]

From: [at]} <Chris>
Date: Sun, 24 Oct 2010 22:30:31 +1030

----boundary-LibPST-iamunique-1778229109_-_-
Content-type: text/plain

> -----Original Message-----
> From: BlackBox [mailto:BLACKBOX{([at]})nowhere.xy
> Oleg N. Cher
> Sent: Saturday, 23 October 2010 8:59 PM
> To: BLACKBOX{([at]})nowhere.xy
> Subject: Re: [BLACKBOX] [Fwd: Re: [BLACKBOX] Another trap
> during compile]
>
>
> Well, Sdl.MapRGB is defined as:
>
> PROCEDURE [ccall] MapRGB* ["SDL_MapRGB"] (format: PPixelFormat; r:
> UInt8; g: UInt8; b: UInt8): UInt32;
>

OK. I'm not 100% sure but I think you can equivalently map this definition
as:

PROCEDURE [ccall] MapRGB* ["SDL_MapRGB"] (format: PPixelFormat; r, g, b:
SHORTCHAR): INTEGER;

and then avoid the UInt8 typecasts.

As long as you aren't using the result in arithmetic expressions I don't see
that it really matters whether it is defined as signed or unsigned as long
as it is a 32-bit value.

> As you see, result type of MapRGB is always UInt32 (INTEGER, in fact),
> and we need convert this value to one of types (BYTE,
> SHORTINT, INTEGER)

That is where SYSTEM.VAL is not going to work. If you are *converting* the
32-bit return value to a smaller (16-, or 8-bit) type you can't do that with
typecasting, you should use the SHORT function instead.

However, don't take my word for it - I might well be missing the point
altogether.

> that defines screen color depth OPTIONALLY defined in other module.
> UInt32, SInt32 are not my idea, it is adaptation of Delphi's JEDI SDL.
>
> And you can understant what is OPTIONALLY SETTINGS before
> critique my way?
>

No sorry - I do not understand exactly how you have set it up to OPTIONALLY
using different result types.

Regards,
Chris Burrows
CFB Software
http://www.cfbsoftware.com

----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-1778229109_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwID4gLS0tLS1PcmlnaW5hbCBNZXNzYWdlLS0tLS1c
cGFyDQo+IEZyb206IEJsYWNrQm94IFttYWlsdG86QkxBQ0tCT1hATElTVFMuT0JFUk9OLkNIXSBP
biBCZWhhbGYgT2YgXHBhcg0KPiBPbGVnIE4uIENoZXJccGFyDQo+IFNlbnQ6IFNhdHVyZGF5LCAy
MyBPY3RvYmVyIDIwMTAgODo1OSBQTVxwYXINCj4gVG86IEJMQUNLQk9YQExJU1RTLk9CRVJPTi5D
SFxwYXINCj4gU3ViamVjdDogUmU6IFtCTEFDS0JPWF0gW0Z3ZDogUmU6IFtCTEFDS0JPWF0gQW5v
dGhlciB0cmFwIFxwYXINCj4gZHVyaW5nIGNvbXBpbGVdXHBhcg0KPiBccGFyDQo+IFxwYXINCj4g
V2VsbCwgU2RsLk1hcFJHQiBpcyBkZWZpbmVkIGFzOlxwYXINCj4gXHBhcg0KPiBQUk9DRURVUkUg
W2NjYWxsXSBNYXBSR0IqIFsiU0RMX01hcFJHQiJdIChmb3JtYXQ6IFBQaXhlbEZvcm1hdDsgcjog
XHBhcg0KPiBVSW50ODsgZzogVUludDg7IGI6IFVJbnQ4KTogVUludDMyO1xwYXINCj4gXHBhcg0K
XHBhcg0KT0suIEknbSBub3QgMTAwJSBzdXJlIGJ1dCBJIHRoaW5rIHlvdSBjYW4gZXF1aXZhbGVu
dGx5IG1hcCB0aGlzIGRlZmluaXRpb25ccGFyDQphczpccGFyDQpccGFyDQpQUk9DRURVUkUgW2Nj
YWxsXSBNYXBSR0IqIFsiU0RMX01hcFJHQiJdIChmb3JtYXQ6IFBQaXhlbEZvcm1hdDsgciwgZywg
YjpccGFyDQpTSE9SVENIQVIpOiBJTlRFR0VSO1xwYXINClxwYXINCmFuZCB0aGVuIGF2b2lkIHRo
ZSBVSW50OCB0eXBlY2FzdHMuIFxwYXINClxwYXINCkFzIGxvbmcgYXMgeW91IGFyZW4ndCB1c2lu
ZyB0aGUgcmVzdWx0IGluIGFyaXRobWV0aWMgZXhwcmVzc2lvbnMgSSBkb24ndCBzZWVccGFyDQp0
aGF0IGl0IHJlYWxseSBtYXR0ZXJzIHdoZXRoZXIgaXQgaXMgZGVmaW5lZCBhcyBzaWduZWQgb3Ig
dW5zaWduZWQgYXMgbG9uZ1xwYXINCmFzIGl0IGlzIGEgMzItYml0IHZhbHVlLlxwYXINClxwYXIN
Cj4gQXMgeW91IHNlZSwgcmVzdWx0IHR5cGUgb2YgTWFwUkdCIGlzIGFsd2F5cyBVSW50MzIgKElO
VEVHRVIsIGluIGZhY3QpLFxwYXINCj4gYW5kIHdlIG5lZWQgY29udmVydCB0aGlzIHZhbHVlIHRv
IG9uZSBvZiB0eXBlcyAoQllURSwgXHBhcg0KPiBTSE9SVElOVCwgSU5URUdFUilccGFyDQpccGFy
DQpUaGF0IGlzIHdoZXJlIFNZU1RFTS5WQUwgaXMgbm90IGdvaW5nIHRvIHdvcmsuIElmIHlvdSBh
cmUgKmNvbnZlcnRpbmcqIHRoZVxwYXINCjMyLWJpdCByZXR1cm4gdmFsdWUgdG8gYSBzbWFsbGVy
ICgxNi0sIG9yIDgtYml0KSB0eXBlIHlvdSBjYW4ndCBkbyB0aGF0IHdpdGhccGFyDQp0eXBlY2Fz
dGluZywgeW91IHNob3VsZCB1c2UgdGhlIFNIT1JUIGZ1bmN0aW9uIGluc3RlYWQuXHBhcg0KXHBh
cg0KSG93ZXZlciwgZG9uJ3QgdGFrZSBteSB3b3JkIGZvciBpdCAtIEkgbWlnaHQgd2VsbCBiZSBt
aXNzaW5nIHRoZSBwb2ludFxwYXINCmFsdG9nZXRoZXIuXHBhcg0KXHBhcg0KPiB0aGF0IGRlZmlu
ZXMgc2NyZWVuIGNvbG9yIGRlcHRoIE9QVElPTkFMTFkgZGVmaW5lZCBpbiBvdGhlciBtb2R1bGUu
XHBhcg0KPiBVSW50MzIsIFNJbnQzMiBhcmUgbm90IG15IGlkZWEsIGl0IGlzIGFkYXB0YXRpb24g
b2YgRGVscGhpJ3MgSkVESSBTREwuXHBhcg0KPiBccGFyDQo+IEFuZCB5b3UgY2FuIHVuZGVyc3Rh
bnQgd2hhdCBpcyBPUFRJT05BTExZIFNFVFRJTkdTIGJlZm9yZSBccGFyDQo+IGNyaXRpcXVlIG15
IHdheT9ccGFyDQo+IFxwYXINClxwYXINCk5vIHNvcnJ5IC0gSSBkbyBub3QgdW5kZXJzdGFuZCBl
eGFjdGx5IGhvdyB5b3UgaGF2ZSBzZXQgaXQgdXAgdG8gT1BUSU9OQUxMWVxwYXINCnVzaW5nIGRp
ZmZlcmVudCByZXN1bHQgdHlwZXMuXHBhcg0KXHBhcg0KUmVnYXJkcyxccGFyDQpDaHJpcyBCdXJy
b3dzXHBhcg0KQ0ZCIFNvZnR3YXJlXHBhcg0KaHR0cDovL3d3dy5jZmJzb2Z0d2FyZS5jb21ccGFy
DQpccGFyDQpccGFyDQotLS0tXHBhcg0KVG8gdW5zdWJzY3JpYmUsIHNlbmQgYSBtZXNzYWdlIHdp
dGggYm9keSAiU0lHTk9GRiBCTEFDS0JPWCIgdG8gTElTVFNFUlZATElTVFMuT0JFUk9OLkNIXH19
AC9PVQ==
----boundary-LibPST-iamunique-1778229109_-_---

Received on Sun Oct 24 2010 - 14:00:31 UTC