Hi
This is quite embassing really.
My old code for sim_agent (when i was working with aaron)
now longer runs with the newkit version for Unix platforms.
I am making use of the teach/ref material to update this code.
and my rule sets/systems/.families are fixable but what has
really thrown me is this:
/* File: simtest.p
Author: D.N.Davis
Date: 04/11/99
Purpose: Test agent defintion and method sim_run_agent for
that definition
-----------------------------------------------------------------------*/
;;; Support for object oriented programming
uses objectclass;
;;; Rule-based mechanisms in Poprulebase
uses prblib;
uses poprulebase;
;;; The scheduler and other mechanisms in SIM_AGENT
uses simlib;
uses sim_agent;
uses sim_harness
/* Define my own class of sim_object */
define :class sim_test;is sim_object;
enddefine;
define :method sim_run_agent(agent:sim_test, objects);
pr('Hi - sim_run_agent for sim_test class used\n');
true->prb_chatty;
call_next_method(agent, objects);
false->prb_chatty;
enddefine;
/* Esc d on
go(1);
and the pr line in
sim_run_agent
for sim_test is NOT output!
*/
define go( ntimes );
lvars objs;
[% newsim_test()%] ->objs;
sim_scheduler( objs, ntimes );
enddefine;
/*---------------------------------------------------------------------*/
|