Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"

Re^5: Exploring Inline::C (Generating primes)

by wazoox (Prior)
on Oct 28, 2011 at 20:20 UTC ( #934501=note: print w/ replies, xml ) Need Help??

in reply to Re^4: Exploring Inline::C (Generating primes)
in thread Exploring Inline::C (Generating primes)

OK, I see : the perl comments are included in the C source, and of course a line beginning with a # has unexpected effects there :) So adding a // in front of lines 137 and 164 saves the day:

ok 1 - The first 501 primes are found from 1 to 3571.
ok 2 - external_cpp() function gives same results as basic_perl().
ok 3 - inline_c() function gives same results as basic_perl().
# Comparing basic_perl(), external_cpp(), and inline_c() for
# 5 seconds searching 150000 integers.
                Rate   basic_perl external_cpp     inline_c
basic_perl   0.984/s           --         -90%         -96%
external_cpp  9.45/s         860%           --         -58%
inline_c      22.6/s        2197%         139%           --
# I love it when a plan comes together.

Comment on Re^5: Exploring Inline::C (Generating primes)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://934501]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (11)
As of 2016-02-10 13:45 GMT
Find Nodes?
    Voting Booth?

    How many photographs, souvenirs, artworks, trophies or other decorative objects are displayed in your home?

    Results (346 votes), past polls