develooper Front page | perl.perl6.internals | Postings from September 2005

Re: tcl, exceptions in leo-ctx5

From:
Will Coleda
Date:
September 19, 2005 13:43
Subject:
Re: tcl, exceptions in leo-ctx5
Message ID:
DF424FD3-FEC1-4092-9FF2-40FF649E9601@coleda.com
Good! [inline] isn't real Tcl, it's specific to partcl.

That test consists of the code:

  inline PASM {
    print "ok\n"
   }

which should do the obvious thing. Odd that it's squawking about  
MMD_add.

Can you 1) try this PIR, and 2) if that *works*, copy that tcl  
snippet to "examples/foo.tcl", cd to examples and run "make test" and  
send me the results?  (If it doesn't work, it's probably a problem  
with the PASM compiler.)


.sub main
   .local string code
   .local pmc pasm_compiler,invokable

   code = "   print \"ok\\n\"\n "
   pasm_compiler = compreg "PASM"

   invokable = pasm_compiler(code)
   invokable()
.end




On Sep 19, 2005, at 4:27 PM, Andy Dougherty wrote:

> On Thu, 15 Sep 2005, Will Coleda wrote:
>
>
>> Done. All tests pass for tcl in leo-ctx5. (And with leo's recent  
>> fixes,
>> hopefully this means on all platforms for real this time. =-)
>>
>> This should also fix the problem on windows, as the missing  
>> functions have
>> been uncommented, and are now available.
>>
>> Please svn up and retest.
>>
>
> Down to one failure now on Sparc/Solaris 8 (r9205):
>
> t/cmd_inline....
> #     Failed test (t/cmd_inline.t at line 18)
> #          got: 'ok
> # MMD function __add not foundfor types (1, -100)
> # '
> #     expected: 'ok
> # '
> # Looks like you failed 1 test of 3.
> dubious
>     Test returned status 1 (wstat 256, 0x100)
> DIED. FAILED test 2
>     Failed 1/3 tests, 66.67% okay
> Failed 1/1 test scripts, 0.00% okay. 1/3 subtests failed, 66.67% okay.
> Failed Test    Stat Wstat Total Fail  Failed  List of Failed
> ---------------------------------------------------------------------- 
> ---------
> t/cmd_inline.t    1   256     3    1  33.33%  2
>
>
> -- 
>     Andy Dougherty        doughera@lafayette.edu
>
>




nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About