~ubuntu-branches/ubuntu/maverick/swig1.3/maverick

« back to all changes in this revision

Viewing changes to Examples/perl5/funcptr/example.pl

• browse files at revision 1
• compare with another revision
• download diff
• download tarball
• view history from revision 1

Show diffs side-by-side

added

removed

Examples/perl5/funcptr/example.pl

 

1

# file: example.pl

 

2

 

 

3

use example;

 

4

 

 

5

$a = 37;

 

6

$b = 42;

 

7

 

 

8

# Now call our C function with a bunch of callbacks

 

9

 

 

10

print "Trying some C callback functions\n";

 

11

print "    a        = $a\n";

 

12

print "    b        = $b\n";

 

13

print "    ADD(a,b) = ", example::do_op($a,$b,$example::ADD),"\n";

 

14

print "    SUB(a,b) = ", example::do_op($a,$b,$example::SUB),"\n";

 

15

print "    MUL(a,b) = ", example::do_op($a,$b,$example::MUL),"\n";

 

16

 

 

17

print "Here is what the C callback function objects look like in Perl\n";

 

18

print "    ADD      = $example::ADD\n";

 

19

print "    SUB      = $example::SUB\n";

 

20

print "    MUL      = $example::MUL\n";

 

21

 

• Older »

Loggerhead is a web-based interface for Breezy
Version: 2.0.1