$result = db_query("SELECT * FROM {comments} WHERE nid=%d",$node->nid);
$comment_list = array();
while ($comment = db_fetch_object($result)) {
  $comment_list[] = l($comment->subject, '/node/'. $node->nid .'#comment-'. $comment->cid);
}
// print a list of comment subjects
print theme('item_list', $comment_list);