]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - 6/contrib/libf2c/libF77/i_dim.c
merge fix for boot-time hang on centos' xen
[FreeBSD/FreeBSD.git] / 6 / contrib / libf2c / libF77 / i_dim.c
1 #include "f2c.h"
2
3 integer
4 i_dim (integer * a, integer * b)
5 {
6   return (*a > *b ? *a - *b : 0);
7 }