My mod_parrot article is finally up on perl.com. Enjoy!
I followed everything up until this, at the end of the authentication example:
# authentication failed
auth_failure:
$I0 = ap_constants['HTTP_UNAUTHORIZED']
goto auth_return_status
# return our status code
auth_return_status:
$I0 = ap_constants['OK']
.pcc_begin_return
.return $I0
.pcc_end_return
.end
Wouldn't this return ap_constants['OK'] even when the authentication fails? ($I0 gets assigned that value in both cases, the ap_constants['HTTP_UNAUTHORIZED'] being overwritten "in" auth_return_status).
Re:I am confused
jhorwitz on 2004-12-23T18:37:25
yes, you're right. looks like that got mixed up during cut & paste.Re:I am confused
chromatic on 2004-12-23T18:49:54
Fixed now. Good catch, Michel.
Not confused anymore
mir on 2004-12-23T19:02:18
OK, it makes more sense now.
Cool article BTW, it's nice to see yet an other demonstration of Parrot usefulness. And I loved the examples: I find it quite incredible to be able to do that kind of high-level task in a few lines of an assembly-like language.
