1 files changed, 13 insertions, 0 deletions
diff --git a/ipl/packs/idol/sinvktst.iol b/ipl/packs/idol/sinvktst.iol
new file mode 100644
index 0000000..cd0f34d
--- /dev/null
+++ b/ipl/packs/idol/sinvktst.iol
@@ -0,0 +1,13 @@
+class sinvbuffer : strinvokable()
+  method forward_char()
+    write("success")
+  end
+  method eval(s,args[])
+    suspend self$strinvokable.eval(map(s,"-","_"))
+  end
+end
+
+procedure main()
+  x := sinvbuffer()
+  x $ eval("forward-char")
+end