peter 27 years ago
parent
commit
f8ab2581ff
2 changed files with 11 additions and 0 deletions
  1. 10 0
      bugs/bug0155.pp
  2. 1 0
      bugs/readme.txt

+ 10 - 0
bugs/bug0155.pp

@@ -0,0 +1,10 @@
+function asmstr:string;assembler;
+asm
+	movl	__RESULT,%edi
+	movl	$0x4101,%al
+	stosw
+end;
+
+begin
+  writeln(asmstr);
+end;

+ 1 - 0
bugs/readme.txt

@@ -205,4 +205,5 @@ bug0152.pp   End value of loop variable must be calculated before loop
 bug0153.pp   indexing a local/para var should produce an error like tp7 because
              it's doomed to crash
 bug0154.pp   Subrange types give type mismatch when assigning to base type
+bug0155.pp   Missing string return for asm functions