summaryrefslogtreecommitdiff
path: root/ipl/packs/loadfuncpp/examples/iterate.icn
diff options
context:
space:
mode:
Diffstat (limited to 'ipl/packs/loadfuncpp/examples/iterate.icn')
-rw-r--r--ipl/packs/loadfuncpp/examples/iterate.icn13
1 files changed, 13 insertions, 0 deletions
diff --git a/ipl/packs/loadfuncpp/examples/iterate.icn b/ipl/packs/loadfuncpp/examples/iterate.icn
new file mode 100644
index 0000000..0d6de0e
--- /dev/null
+++ b/ipl/packs/loadfuncpp/examples/iterate.icn
@@ -0,0 +1,13 @@
+
+link loadfuncpp
+
+
+procedure main()
+ total := loadfuncpp("./iterate.so", "iexample")
+ write( total(g, [1,2,3,4,5]) )
+end
+
+procedure g(ls[])
+ suspend !ls
+end
+