File: libnet.code

package info (click to toggle)
slof 20180702%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 3,768 kB
  • sloc: ansic: 30,760; asm: 2,087; makefile: 1,177; pascal: 351; perl: 99; sh: 60
file content (16 lines) | stat: -rw-r--r-- 290 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 

#include <netapps.h>

PRIM(NET_X2d_LOAD)
	int alen = TOS.n; POP;
	char *arg = TOS.a; POP;
	long maxlen = TOS.n; POP;
	void *loadaddr = TOS.a;
	TOS.n = netload(loadaddr, maxlen, arg, alen);
MIRP

PRIM(NET_X2d_PING)
	int alen = TOS.n; POP;
	char *arg = TOS.a;
	TOS.n = ping(arg, alen);
MIRP