random.c File Reference

#include "f2c.h"

Include dependency graph for random.c:

Go to the source code of this file.

Functions
integer	random_ (struct lpc10_decoder_state *st)

Function Documentation

random_()

integer random_

(

struct lpc10_decoder_state *

st

)

Definition at line 93 of file random.c.

References lpc10_decoder_state::j, lpc10_decoder_state::k, and lpc10_decoder_state::y.

Referenced by bsynz_().

{
    /* Initialized data */

    integer *j;
    integer *k;
    shortint *y;

    /* System generated locals */
    integer ret_val;

/*    Parameters/constants */
/*       Local state */
/*   The following is a 16 bit 2's complement addition, */
/*   with overflow checking disabled */

    j = &(st->j);
    k = &(st->k);
    y = &(st->y[0]);

    y[*k - 1] += y[*j - 1];
    ret_val = y[*k - 1];
    --(*k);
    if (*k <= 0) {
   *k = 5;
    }
    --(*j);
    if (*j <= 0) {
   *j = 5;
    }
    return ret_val;
} /* random_ */