[hcoop/debian/mlton.git] / runtime / basis / Net / Net.c

#include "platform.h"

Word32_t Net_htonl (Word32_t w) {
  Word32_t r = htonl (w);
  return r;
}

Word32_t Net_ntohl (Word32_t w) {
  Word32_t r = ntohl (w);
  return r;
}

Word16_t Net_htons (Word16_t w) {
  Word16_t r = htons (w);
  return r;
}

Word16_t Net_ntohs (Word16_t w) {
  Word16_t r = ntohs (w);
  return r;
}
Commit	Line	Data
7f918cf1 CE	1	#include "platform.h"
	2
	3	Word32_t Net_htonl (Word32_t w) {
	4	Word32_t r = htonl (w);
	5	return r;
	6	}
	7
	8	Word32_t Net_ntohl (Word32_t w) {
	9	Word32_t r = ntohl (w);
	10	return r;
	11	}
	12
	13	Word16_t Net_htons (Word16_t w) {
	14	Word16_t r = htons (w);
	15	return r;
	16	}
	17
	18	Word16_t Net_ntohs (Word16_t w) {
	19	Word16_t r = ntohs (w);
	20	return r;
	21	}