-(define our-emo (hive-create-actor hive <emo>))
-(define our-proog (hive-create-actor hive <proog>))
-(define (run-demo . args)
- (ez-run-hive hive
- (list (hive-bootstrap-message hive our-emo 'greet-proog
- #:target our-proog))))
+(define our-emo (bootstrap-actor hive <emo>))
+(define our-proog (bootstrap-actor hive <proog>))
+(define (main . args)
+ (run-hive hive
+ (list (bootstrap-message hive our-emo 'greet-proog
+ our-proog))))