Fixes a defect caused by a missing rename of capability -> make-capability

codeZeilen · codeZeilen · commit 9cc73ce8ff23 · 2025-05-22T09:55:32.000+02:00
diff --git a/rosetta-test/rosetta-test.scm b/rosetta-test/rosetta-test.scm
@@ -8,7 +8,7 @@
     ;
 
     (define (suite suite-name suite-version suite-sources suite-contents) (let 
-        ((root-capability (capability 
+        ((root-capability (make-capability 
                 "root"
                 (filter (lambda (e) (not (is-placeholder? e))) suite-contents))))
         (capability-set-children-parent! root-capability)

Original file line number	Diff line number	Diff line change
`@@ -8,7 +8,7 @@`
`8`	`8`	`;`
`9`	`9`
`10`	`10`	`(define (suite suite-name suite-version suite-sources suite-contents) (let`
`11`		`- ((root-capability (capability`
	`11`	`+ ((root-capability (make-capability`
`12`	`12`	`"root"`
`13`	`13`	`(filter (lambda (e) (not (is-placeholder? e))) suite-contents))))`
`14`	`14`	`(capability-set-children-parent! root-capability)`