ipl/packs/loadfuncpp/doc/iterate.icn


1
2
3
4
5
6
7
8
9
10
11
12
13


link loadfuncpp


procedure main()
	sum10 := loadfuncpp("./iterate.so", "sum10", 2)
	write( sum10(f,[]) )
end

procedure f()
	suspend 1 to 15
end