|
@@ -286,7 +286,8 @@ implementation
|
|
procedure TWabtTextAssembler.WriteProcResult(pd: tprocdef);
|
|
procedure TWabtTextAssembler.WriteProcResult(pd: tprocdef);
|
|
begin
|
|
begin
|
|
if not assigned(pd) or
|
|
if not assigned(pd) or
|
|
- not Assigned(pd.returndef)
|
|
|
|
|
|
+ not Assigned(pd.returndef) or
|
|
|
|
+ (pd.returndef.size = 0)
|
|
then exit;
|
|
then exit;
|
|
|
|
|
|
writer.AsmWrite(#9'(result'#9);
|
|
writer.AsmWrite(#9'(result'#9);
|