[BLACKBOX] Modula-2 LineDrawing source?

From: [at]} <Bob>
Date: Sat, 8 Mar 2008 10:04:58 -0000

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

Hi,

does anyone know where I can get a copy of the source code of the
LineDrawing implementation module, as described in Prof. Wirth's
'Programming in Modula-2' and 'Algorithms and Data Structures'?

I'd like to see how the line procedure is implemented. The interface
from the definition module is:

PROCEDURE line( d, n: INTEGER );
(* draw a line of length n in direction d (angle = 45*d degrees ) *).

I've googled till my fingers bleed (almost), but can't find it.

TIA,

Bob

----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-2029018178_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIEhpLFxwYXINClxwYXINCmRvZXMgYW55b25lIGtu
b3cgd2hlcmUgSSBjYW4gZ2V0IGEgY29weSBvZiB0aGUgc291cmNlIGNvZGUgb2YgdGhlXHBhcg0K
TGluZURyYXdpbmcgaW1wbGVtZW50YXRpb24gbW9kdWxlLCBhcyBkZXNjcmliZWQgaW4gUHJvZi4g
V2lydGgnc1xwYXINCidQcm9ncmFtbWluZyBpbiBNb2R1bGEtMicgYW5kICdBbGdvcml0aG1zIGFu
ZCBEYXRhIFN0cnVjdHVyZXMnPyBccGFyDQpccGFyDQpJJ2QgbGlrZSB0byBzZWUgaG93IHRoZSBs
aW5lIHByb2NlZHVyZSBpcyBpbXBsZW1lbnRlZC4gVGhlIGludGVyZmFjZVxwYXINCmZyb20gdGhl
IGRlZmluaXRpb24gbW9kdWxlIGlzOlxwYXINClxwYXINClBST0NFRFVSRSBsaW5lKCBkLCBuOiBJ
TlRFR0VSICk7XHBhcg0KKCogZHJhdyBhIGxpbmUgb2YgbGVuZ3RoIG4gaW4gZGlyZWN0aW9uIGQg
KGFuZ2xlID0gNDUqZCBkZWdyZWVzICkgKikuXHBhcg0KXHBhcg0KSSd2ZSBnb29nbGVkIHRpbGwg
bXkgZmluZ2VycyBibGVlZCAoYWxtb3N0KSwgYnV0IGNhbid0IGZpbmQgaXQuXHBhcg0KXHBhcg0K
VElBLFxwYXINClxwYXINCkJvYlxwYXINClxwYXINClxwYXINCi0tLS1ccGFyDQpUbyB1bnN1YnNj
cmliZSwgc2VuZCBhIG1lc3NhZ2Ugd2l0aCBib2R5ICJTSUdOT0ZGIEJMQUNLQk9YIiB0byBMSVNU
U0VSVkBMSVNUUy5PQkVST04uQ0h9fQANCj5c
----boundary-LibPST-iamunique-2029018178_-_---

Received on Sat Mar 08 2008 - 11:04:58 UTC