use Perl

• I am confused (Score:2)

  by mir (51)

  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

  --
  mirod
  • Re:I am confused (Score:1)

    by jhorwitz (4227) <reversethis-{gro.gnihsams} {ta} {ffej}> on 2004.12.23 13:37 (#37076) Homepage Journal

    yes, you're right. looks like that got mixed up during cut & paste.

    Reply to This

    Parent

    • Re:I am confused (Score:1)

      by chromatic (983)

      Fixed now. Good catch, Michel.
    • Not confused anymore (Score:2)

      by mir (51)

      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.

      --
      mirod