Re: [BLACKBOX] Re [BLACKBOX] Seasons Greetings from Linuxland

From: [at]} <Robert>
Date: Tue, 28 Dec 2010 10:45:23 +0000

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

Hiya

Seasons Greeting !

Personally I much prefer the forms:

b := ~a
&
RETURN BooleanExpresssion ()

to the long-winded alternatives mentioned.


On the other hand I dislike (*both*) examples below; what is wrong with the simple

   WriteInt (ABS (a - b)) ?


My memory of PASCAL is very rusty and my knowledge of c is non-existent, so do
not take these comment below too seriously.

I think that 'writeln' is part of the PASCAL language, not a very good part,
and removed from languages like Modula-II & Oberon.

I think that 'printf' is not part of c, but is in a library. Possibly printf
is a much better (more flexible, more controllable, more complicated?) procedure
than writeln. What I dislike about both is that you cannot easily tell from the
source whether it is a library procedure or not, or which library it is in.


Do we have, or want, a similar, or better, procedure in Oberon / Component Pascal?


Maybe, as a group, rather than discussing the imagined benefits of various
languages it would be more useful to discuss the characteristics of particular
library modules. Then if there is a consensus that a particular function (for
example printing an integer) is desirable we can at least do something about it.


Anyway I am off skiing for a week, and not taking a computer (or phone) with me.

Seasons greetings again - Robert.



On 28/12/2010 09:17 AM, Frans-Pieter Vonck wrote:

> thanks for your contemplation about the blindness in faith of the oberon
> users...
>
> Below I quote two versions of an standard io programme given by Skiena ,
> one in C the other in Pacal
>
> #include<stdio.h>
>
> int main() {
> long p,q,r;
>
> while (scanf("%ld %ld",&p,&q)
> !=EOF) {
> if (q>p) r=q-p;
> else r=p-q;
>
> printf("%ld\n",r);
> }
> }
>
>
> {$N+}
> program acm;
> var
> a, b, c : integer;
> begin
> while not eof do
> begin
> readln(a, b);
> if b> a then
> begin
> c := b;
> b := a;
> a := c
> end;
> writeln(a - b);
> end
> end. 


----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-1611364774_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIEhpeWFccGFyDQpccGFyDQpTZWFzb25zIEdyZWV0
aW5nICFccGFyDQpccGFyDQpQZXJzb25hbGx5IEkgbXVjaCBwcmVmZXIgdGhlIGZvcm1zOlxwYXIN
ClxwYXINCmIgOj0gfmFccGFyDQomXHBhcg0KUkVUVVJOIEJvb2xlYW5FeHByZXNzc2lvbiAoKVxw
YXINClxwYXINCnRvIHRoZSBsb25nLXdpbmRlZCBhbHRlcm5hdGl2ZXMgbWVudGlvbmVkLlxwYXIN
ClxwYXINClxwYXINCk9uIHRoZSBvdGhlciBoYW5kIEkgZGlzbGlrZSAoKmJvdGgqKSBleGFtcGxl
cyBiZWxvdzsgd2hhdCBpcyB3cm9uZyB3aXRoIHRoZSBzaW1wbGVccGFyDQpccGFyDQogICBXcml0
ZUludCAoQUJTIChhIC0gYikpID9ccGFyDQpccGFyDQpccGFyDQpNeSBtZW1vcnkgb2YgUEFTQ0FM
IGlzIHZlcnkgcnVzdHkgYW5kIG15IGtub3dsZWRnZSBvZiBjIGlzIG5vbi1leGlzdGVudCwgc28g
ZG9ccGFyDQpub3QgdGFrZSB0aGVzZSBjb21tZW50IGJlbG93IHRvbyBzZXJpb3VzbHkuXHBhcg0K
XHBhcg0KSSB0aGluayB0aGF0ICd3cml0ZWxuJyBpcyBwYXJ0IG9mIHRoZSBQQVNDQUwgbGFuZ3Vh
Z2UsIG5vdCBhIHZlcnkgZ29vZCBwYXJ0LFxwYXINCmFuZCByZW1vdmVkIGZyb20gbGFuZ3VhZ2Vz
IGxpa2UgTW9kdWxhLUlJICYgT2Jlcm9uLlxwYXINClxwYXINCkkgdGhpbmsgdGhhdCAncHJpbnRm
JyBpcyBub3QgcGFydCBvZiBjLCBidXQgaXMgaW4gYSBsaWJyYXJ5LiBQb3NzaWJseSBwcmludGZc
cGFyDQppcyBhIG11Y2ggYmV0dGVyIChtb3JlIGZsZXhpYmxlLCBtb3JlIGNvbnRyb2xsYWJsZSwg
bW9yZSBjb21wbGljYXRlZD8pIHByb2NlZHVyZSBccGFyDQp0aGFuIHdyaXRlbG4uIFdoYXQgSSBk
aXNsaWtlIGFib3V0IGJvdGggaXMgdGhhdCB5b3UgY2Fubm90IGVhc2lseSB0ZWxsIGZyb20gdGhl
IFxwYXINCnNvdXJjZSB3aGV0aGVyIGl0IGlzIGEgbGlicmFyeSBwcm9jZWR1cmUgb3Igbm90LCBv
ciB3aGljaCBsaWJyYXJ5IGl0IGlzIGluLlxwYXINClxwYXINClxwYXINCkRvIHdlIGhhdmUsIG9y
IHdhbnQsIGEgc2ltaWxhciwgb3IgYmV0dGVyLCBwcm9jZWR1cmUgaW4gT2Jlcm9uIC8gQ29tcG9u
ZW50IFBhc2NhbD9ccGFyDQpccGFyDQpccGFyDQpNYXliZSwgYXMgYSBncm91cCwgcmF0aGVyIHRo
YW4gZGlzY3Vzc2luZyB0aGUgaW1hZ2luZWQgYmVuZWZpdHMgb2YgdmFyaW91cyBccGFyDQpsYW5n
dWFnZXMgaXQgd291bGQgYmUgbW9yZSB1c2VmdWwgdG8gZGlzY3VzcyB0aGUgY2hhcmFjdGVyaXN0
aWNzIG9mIHBhcnRpY3VsYXJccGFyDQpsaWJyYXJ5IG1vZHVsZXMuIFRoZW4gaWYgdGhlcmUgaXMg
YSBjb25zZW5zdXMgdGhhdCBhIHBhcnRpY3VsYXIgZnVuY3Rpb24gKGZvciBccGFyDQpleGFtcGxl
IHByaW50aW5nIGFuIGludGVnZXIpIGlzIGRlc2lyYWJsZSB3ZSBjYW4gYXQgbGVhc3QgZG8gc29t
ZXRoaW5nIGFib3V0IGl0LlxwYXINClxwYXINClxwYXINCkFueXdheSBJIGFtIG9mZiBza2lpbmcg
Zm9yIGEgd2VlaywgYW5kIG5vdCB0YWtpbmcgYSBjb21wdXRlciAob3IgcGhvbmUpIHdpdGggbWUu
XHBhcg0KXHBhcg0KU2Vhc29ucyBncmVldGluZ3MgYWdhaW4gLSBSb2JlcnQuXHBhcg0KXHBhcg0K
XHBhcg0KXHBhcg0KT24gMjgvMTIvMjAxMCAwOToxNyBBTSwgRnJhbnMtUGlldGVyIFZvbmNrIHdy
b3RlOlxwYXINClxwYXINCj4gdGhhbmtzIGZvciB5b3VyIGNvbnRlbXBsYXRpb24gYWJvdXQgdGhl
IGJsaW5kbmVzcyBpbiBmYWl0aCBvZiB0aGUgb2Jlcm9uXHBhcg0KPiB1c2Vycy4uLlxwYXINCj5c
cGFyDQo+IEJlbG93IEkgcXVvdGUgdHdvIHZlcnNpb25zIG9mIGFuIHN0YW5kYXJkIGlvIHByb2dy
YW1tZSBnaXZlbiBieSBTa2llbmEgICxccGFyDQo+IG9uZSBpbiBDIHRoZSBvdGhlciBpbiBQYWNh
bFxwYXINCj5ccGFyDQo+ICNpbmNsdWRlPHN0ZGlvLmg+XHBhcg0KPlxwYXINCj4gaW50IG1haW4o
KSBce1xwYXINCj4gICAgICAgIGxvbmcgcCxxLHI7XHBhcg0KPlxwYXINCj4gICAgICAgIHdoaWxl
IChzY2FuZigiJWxkICVsZCIsJnAsJnEpXHBhcg0KPiBcdGFiIFx0YWIgIT1FT0YpIFx7XHBhcg0K
PiAgIFx0YWIgaWYgKHE+cCkgcj1xLXA7XHBhcg0KPiAgICAgICAgICBlbHNlIHI9cC1xO1xwYXIN
Cj5ccGFyDQo+ICAgICAgICAgIHByaW50ZigiJWxkXFxuIixyKTtccGFyDQo+ICAgICAgICBcfVxw
YXINCj4gXH1ccGFyDQo+XHBhcg0KPlxwYXINCj4gXHskTitcfVxwYXINCj4gcHJvZ3JhbSBhY207
XHBhcg0KPiB2YXJccGFyDQo+ICAgIGEsIGIsIGMgOiBpbnRlZ2VyO1xwYXINCj4gYmVnaW5ccGFy
DQo+ICAgIHdoaWxlIG5vdCBlb2YgZG9ccGFyDQo+ICAgIGJlZ2luXHBhcg0KPiAgICAgIHJlYWRs
bihhLCBiKTtccGFyDQo+ICAgICAgaWYgYj4gIGEgdGhlblxwYXINCj4gICAgICBiZWdpblxwYXIN
Cj4gICAgICAgIGMgOj0gYjtccGFyDQo+ICAgICAgICBiIDo9IGE7XHBhcg0KPiAgICAgICAgYSA6
PSBjXHBhcg0KPiAgICAgIGVuZDtccGFyDQo+ICAgICAgd3JpdGVsbihhIC0gYik7XHBhcg0KPiAg
ICBlbmRccGFyDQo+IGVuZC5ccGFyDQpccGFyDQpccGFyDQotLS0tXHBhcg0KVG8gdW5zdWJzY3Jp
YmUsIHNlbmQgYSBtZXNzYWdlIHdpdGggYm9keSAiU0lHTk9GRiBCTEFDS0JPWCIgdG8gTElTVFNF
UlZATElTVFMuT0JFUk9OLkNIfX0AAB4AAA==
----boundary-LibPST-iamunique-1611364774_-_---
Received on Tue Dec 28 2010 - 11:45:23 UTC

This archive was generated by hypermail 2.3.0 : Thu Sep 26 2013 - 06:30:26 UTC