Anonymous user
Tarjan: Difference between revisions
m
→Manual implementation
Line 539:
sccs)
(define (make-graph
(define store (make-hash))
(define (make-node v) (hash-ref! store v (thunk (node v #f #f #f))))
Line 546:
;; reference instead of actual value. Had we use the actual value,
;; the key would be a mutable value, which causes undefined behavior
(for/hasheq ([
(tarjan (make-graph
{{out}}
|