[RPL/2] self compiling ?

[BERTRAND Joël]

Adrian Blake wrote:
> The two intrinsics are not working as you describe:
> 
> [adrian at adios rpl]$ rpl -is
> +++RPL/2 version 4.0.0.prerelease.2 (Wednesday 11/14/07, 21:52:10 EST)
> +++Copyright (C) 1989 to 2006, 2007 BERTRAND Joël

	I see you don't use the last snapshot.

> +++This is a free software with absolutely no warranty.
> +++For details, type 'warranty'.
> 
> RPL/2> << 1 3 'x' + >> 5 { * } obsub
> 
> 3: << 1 3 'x' + >>
> 2: 5
> 1: { * }
> RPL/2> << 1 3 'x' + >> 5 { << X sin >> } obsub
> 
> 6: << 1 3 'x' + >>
> 5: 5
> 4: { * }
> 3: << 1 3 'x' + >>
> 2: 5
> 1: { << 'X' SIN >> }
> RPL/2>

	With this snapshot, you can see:

fermat:[~/gopher/gcc/build/sparc-linux-gnu/libjava] > rpl -is
+++RPL/2 version 4.0.0.prerelease.2 (mardi 27.11.2007, 14:14:47 CET)
+++Copyright (C) 1989 à 2006, 2007 BERTRAND Joël

+++Ce logiciel est un logiciel libre sans aucune garantie de fonctionnement.
+++Pour plus de détails, utilisez la commande 'warranty'.

RPL/2> << 1 3 'x' + >> 5 { * } obsub

1: << 1 3 'x' * >>
RPL/2> << 1 3 'x' + >> 5 { << X sin >> } obsub

2: << 1 3 'x' * >>
1: << 1 3 'x' << 'X' SIN >> >>
RPL/2> abort
fermat:[~/gopher/gcc/build/sparc-linux-gnu/libjava] >

> does obsub have the following meaning:
> 
> << a b c d e >>  x { w } obsub
> 
> insert object w before x position

	No, OBSUB replaces the x-th object and does not add any object.

	Regards,

	JKB