2003-05-15 Eric Christopher <echristo@redhat.com>

[official-gcc.git] / libf2c / libF77 / i_mod.c

#include "f2c.h"

integer
i_mod (integer * a, integer * b)
{
  return (*a % *b);
}