Path: news.cs.au.dk!not-for-mail
From: "Sascha Kimmel" <kimmel@tricos.com>
Newsgroups: comp.lang.beta
Subject: RE: Bifrost...
Date: 10 Jun 1999 09:16:10 -0000
Organization: University of Aarhus, Department of Computer Science (DAIMI)
Lines: 53
Approved: mailtonews@cs.au.dk
Distribution: world
Message-ID: <19990610091610.22855.qmail@noatun.mjolner.dk>
Reply-To: "Sascha Kimmel" <kimmel@tricos.com>
NNTP-Posting-Host: daimi.cs.au.dk
X-Trace: xinwen.cs.au.dk 929006829 4427910 255.255.255.255 (10 Jun 1999 09:27:09 GMT)
X-Complaints-To: news@cs.au.dk
NNTP-Posting-Date: 10 Jun 1999 09:27:09 GMT
Xref: news.cs.au.dk comp.lang.beta:11992

> -----Original Message-----
> From: Tim Kettler [mailto:sopr022@funghi3.cs.uni-dortmund.de]
> Sent: Thursday, June 10, 1999 10:50 AM
> To: usergroup@mjolner.dk
> Subject: Bifrost...
> 
> 
> Hello,
>
>    2. use Concurrency. Have I to use GuienvSystemenv as the origin
>       of my program ?


Hi!

It has to look this way (in case you do not know) :

ORIGIN '~beta/guienv/v1.6/guienvsystemenv';

-- program: Descriptor --

systemEnv
  (#
     setWindowEnv::<(#  do gui[]->theWindowEnv[] #);
	 
	 gui:@guienv
	 (#
	 	(** put your windows and GUI objects here **)
		...
	  #);

	(** systemenv (rather non-GUI-)declarations,
	(** put your concurrency here: **)

	myConFunc:@|System
	(#
		cycle
		(#
			...
			0.1->sleep;
		#);
	#);
	
	do

	(** something **)
	...
	myConFunc[]->fork;
	...
#)

Regards,
Sascha Kimmel