summaryrefslogtreecommitdiff
path: root/trunk/Examples/guile/multivalue/example.c
diff options
context:
space:
mode:
Diffstat (limited to 'trunk/Examples/guile/multivalue/example.c')
-rw-r--r--trunk/Examples/guile/multivalue/example.c18
1 files changed, 18 insertions, 0 deletions
diff --git a/trunk/Examples/guile/multivalue/example.c b/trunk/Examples/guile/multivalue/example.c
new file mode 100644
index 000000000..c9ebad1ae
--- /dev/null
+++ b/trunk/Examples/guile/multivalue/example.c
@@ -0,0 +1,18 @@
+void divide_l(int a, int b, int *quotient_p, int *remainder_p)
+{
+ *quotient_p = a/b;
+ *remainder_p = a%b;
+}
+
+void divide_v(int a, int b, int *quotient_p, int *remainder_p)
+{
+ *quotient_p = a/b;
+ *remainder_p = a%b;
+}
+
+void divide_mv(int a, int b, int *quotient_p, int *remainder_p)
+{
+ *quotient_p = a/b;
+ *remainder_p = a%b;
+}
+