EVA simple_adaptation example fails

[Tony Gahlinger]

The EVA simple_adaptation example of R7B will not run through on
my Linux installation; it bombs out in the print-alarms function,
as shown in the test run below.

The problem appears to lie in the handle_call query of
simple_adaptation, specifically, in the AlarmDef references:

    Handle = query [{A.name, A.sender, A.cause,
                     A.severity, AlarmDef.class} ||
         A <- table(alarm),
         AlarmDef <- table(alarmTable),
         A.name = AlarmDef.name] end,

Commenting out those references lets print_alarms run to completion,
though not as intended of course. A scan through handle_event functions
in
the same module shows remnants of previous mnemosyne bug go-arounds

   X = Name, % due to bug in mnemosyne...

(which now do nothing as X isn't used in the functions). So, does
print_alarms need fixing or is mnemosyne still buggy?


--------------- test run that fails -----------------------
# erl -pa oms/ebin -oms use_snmp true -config sys
Erlang (BEAM) emulator version 5.0.1 [source]

Eshell V5.0.1  (abort with ^G)
1> mnesia:create_schema([node()]).
ok
2> application:start(mnesia).
ok
3> oms:create().
ok
4> application:start(sasl).
ok
5> application:start(snmp).
ok
6> application:start(oms).
ok
7> board_test:init_test().
ok
8> board_test:init().
ok
9> simple_adaptation:start().
Initializing simple EVA adaptation...
ok
10> board_test:remove_board(1).
ok
11> ** Event: boardRemoved, 1 generated
simple_adaptation:print_alarms().
Terminating simple EVA adaptation...
=ERROR REPORT==== 29-Oct-2000::19:06:53 ===
** gen_event handler simple_adaptation crashed.
** Was installed in alarm_handler
** Last event was: print_alarms
** When handler state == []
** Reason == {'EXIT',mnemosyne_not_running}
{error,{'EXIT',mnemosyne_not_running}}
12>


--Tony
 
-----------------------------------------------------------
Tony Gahlinger & Associates Inc.
Telecommunication Consultants and Software Development
48 Combermere Crescent, Waterloo ON  N2L 5B1
519-888-6267  Fax: 519-888-9127
-----------------------------------------------------------