Bug in regs()

[Tony Rogvall]

Try this at home:

1> Port = open_port({spawn, "cat"}, []).
#Port<0.28>
2> flush().
ok
3> register(cat, Port).
true
4> regs().

** Registered procs on node nonode@REDACTED **
Name                  Pid          Initial Call                     
Reds Msgs
application_controlle <0.5.0>      application_controller:in        
1509    0

=ERROR REPORT==== 17-Sep-2003::19:42:57 ===
Error in process <0.24.0> with exit value:
{badarg,[{erlang,process_info,[#Port<0.28>]},{c,pinfo,1},{c,display_name_info,2},{lists,foreach,2},{erl_eval,do_apply,5},{shell,eval_loop,2}]}

** exited: {badarg,[{erlang,process_info,[#Port<0.28>]},
                    {c,pinfo,1},
                    {c,display_name_info,2},
                    {lists,foreach,2},
                    {erl_eval,do_apply,5},
                    {shell,eval_loop,2}]} **
------------

Should be simple to fix. BTW registered ports is a nice feature,
(meaning do not remove the possiblility to register ports as a fix ;-)

BTW2 a command pi() could be nice to have (port info list)

-- 
Tony Rogvall <tony@REDACTED>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 307 bytes
Desc: This is a digitally signed message part
URL: <http://erlang.org/pipermail/erlang-questions/attachments/20030917/74838d93/attachment.bin>