require 'example'
print "Testing the pointer library\n"
a = Example::new_intp()
b = Example::new_intp()
c = Example::new_intp()
Example::intp_assign(a,37)
Example::intp_assign(b,42)
print " a = #{a}\n"
print " b = #{b}\n"
print " c = #{c}\n"
Example::add(a, b, c)
r = Example::intp_value(c)
print " 37 + 42 = #{r}\n"
Example::delete_intp(a)
Example::delete_intp(b)
Example::delete_intp(c)
print "Trying the typemap library\n"
r = Example::sub(37, 42)
print " 37 - 42 = #{r}\n"
print "Testing multiple return values\n"
q, r = Example::divide(42, 37)
print " 42/37 = #{q} remainder #{r}\n"