-(deftestsuite test-basic-graph-properties (test-graph)
- ((graph-undirected (make-container 'graph-container :default-edge-type :undirected))
- (graph-directed (make-container 'graph-container :default-edge-type :directed)))
+(deftestsuite test-basic-graph-properties (cl-graph-test)
+ ((graph-undirected (make-container 'graph-container
+ :default-edge-type :undirected))
+ (graph-directed (make-container 'graph-container
+ :default-edge-type :directed)))