*** empty log message ***

1 files changed, 3 insertions, 1 deletions

diff --git a/lib/pile.c b/lib/pile.c
index 11f1327..2920139 100644
--- a/lib/pile.c
+++ b/lib/pile.c
@@ -352,7 +352,9 @@ void act_pile(int func)
 					exception(1, _("act_pile: OP_EXP invalid power"));
 				}
 			} else {
-				exception(1, _("act_pile: OP_EXP empty polynom"));
+				push_pile_poly(ply_constr(rat_constr(1,1),0));
+				if (operande2.poly)
+					ply_destruct(operande2.poly);		
 			}
 		} else {
 			exception(1, _("act_pile: OP_EXP invalid arguments"));