Link initailization for FRED and FREDL

Identify the following code (in simplex-link)...

if {[string first "RED" $qtype] != -1} {
$q link [$link_($sid:$did) set link_]
}

... and add the following lines after it:

# CSFQ-begin
if {[string first "FRED" $qtype] != -1} {
$q link [$link_($sid:$did) set link_]
}
if {[string first "FREDL" $qtype] != -1} {
$q link [$link_($sid:$did) set link_]
}
# CSFQ-end

Ion Stoica
Last modified: Wed Jun 2 11:26:42 EDT 1999