Changeset 7852 for src/Pugs/Embed

Show
Ignore:
Timestamp:
11/05/05 15:31:10 (3 years ago)
Author:
autrijus
Message:

* inline Continuation support is broken on switch and CGP cores

in Parrot -- dies with "Illegal register number"; switch to
computed goto core for -B Parrot.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • src/Pugs/Embed/Parrot.hsc

    r7552 r7852  
    4242    args <- getEnv "PUGS_PARROT_OPTS" 
    4343    let args' | isJust args && fromJust args /= "" = fromJust args 
    44               | otherwise                          = "-C" 
     44              | otherwise                          = "-g" -- "-C" -- XXX broken on parrot 0.3.1 
    4545    rawSystem cmd [args', file] 
    4646    return () 
    … …  
    161161#if PARROT_JIT_CAPABLE && defined(PARROT_JIT_CORE) 
    162162    parrot_set_run_core interp PARROT_JIT_CORE 
     163#elsif defined(PARROT_CGOTO_CORE) 
     164    parrot_set_run_core interp PARROT_CGOTO_CORE 
    163165#elsif defined(PARROT_CGP_CORE) 
     166    -- XXX broken on parrot 0.3.1 
    164167    parrot_set_run_core interp PARROT_CGP_CORE 
    165168#endif