blob: 4cb3e518266e9c628ed77de3f80032359dd445f5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
# ddtest.icn -- test ddump
#
# Calls a simple C function that prints out its arguments.
$include "libnames.icn"
global ddump
procedure main()
ddump := loadfunc(FUNCLIB, "ddump")
ddump(-1, 51, 11213)
write()
ddump(&null, 1, "a", 3.4, 'cset')
end
|