# New Ticket Created by  [EMAIL PROTECTED] 
# Please include the string:  [perl #31573]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org:80/rt3/Ticket/Display.html?id=31573 >


---
osname= darwin
osvers= 7.0
arch=   darwin-thread-multi-2level
cc=     cc 
---
Flags:
    category=core
    severity=critical
    ack=no
---
Using the compreg and compile opcodes to register a compiler and compile code is 
crashing with a bus error. Here's some example code (which should probably be added to 
the test suite):

  .pcc_sub main @MAIN
      newsub $P0, .Sub, _interpret
      compreg "LANG", $P0
      
      print "main"
      $P1 = compreg "LANG"
      $P0 = compile $P1, "code"
      $P0()
  .end
  
  .pcc_sub _interpret
      .param string code
      print "_interpret\n"
  .end

This should print "main\n_interpret\n".

--
matt

---
Summary of my parrot 0.1.0 configuration:
  configdate='Tue Sep 14 21:11:14 2004'
  Platform:
    osname=darwin, archname=darwin-thread-multi-2level
    jitcapable=1, jitarchname=ppc-darwin,
    jitosname=DARWIN, jitcpuarch=ppc
    execcapable=1
    perl=perl
  Compiler:
    cc='cc', ccflags='-g -pipe -pipe -fno-common -no-cpp-precomp  -I/usr/local/include 
-pipe -fno-common -Wno-long-double ',
  Linker and Libraries:
    ld='env MACOSX_DEPLOYMENT_TARGET=10.3 cc', ldflags='-L/usr/local/lib 
-flat_namespace ',
    cc_ldflags='',
    libs='-lm'
  Dynamic Linking:
    so='.dylib', ld_shared='-bundle -undefined dynamic_lookup -L/usr/local/lib',
    ld_shared_flags=''
  Types:
    iv=long, intvalsize=4, intsize=4, opcode_t=long, opcode_t_size=4,
    ptrsize=4, ptr_alignment=1 byteorder=4321, 
    nv=double, numvalsize=8, doublesize=8

---
Environment:
    DYLD_LIBRARY_PATH    HOME    LANG    LANGUAGE    LD_LIBRARY_PATH    LOGDIR    PATH 
   SHELL

Reply via email to