archie/prospero/lib/pfs/out_sequence.c

21 lines
391 B
C
Raw Permalink Normal View History

2024-05-27 16:13:40 +02:00
/*
* Copyright (c) 1992, 1993 by the University of Southern California
*
* For copying and distribution information, please see the file <usc-license.h>
*/
#include <usc-license.h>
#include <pfs.h>
#include <pparse.h>
#include <pprot.h>
int
out_sequence(OUTPUT out, TOKEN tk)
{
for(; tk; tk = tk->next)
qoprintf(out, " %'b", tk->token);
return qoprintf(out, "\n");
}