tests/sfc.awl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

ORGANIZATION_BLOCK OB 1
BEGIN

	// Test SFC -1: __NOP
	CALL		SFC -1


	// Test SFC 64: TIME_TCK
	CALL		SFC 64 (
		RET_VAL		:= MD 0
	)
	__SLEEP		100
	CALL		SFC 64 (
		RET_VAL		:= MD 4
	)
	L		MD 4
	L		MD 0
	-D
	UD		DW#16#7FFFFFFF
	__ASSERT>	__ACCU 1,	50
	__ASSERT<	__ACCU 1,	500

END_ORGANIZATION_BLOCK