File tree Expand file tree Collapse file tree 1 file changed +6
-2
lines changed
test/micro-distribution/lib/Standard/Base/0.0.0-dev/src/Runtime Expand file tree Collapse file tree 1 file changed +6
-2
lines changed Original file line number Diff line number Diff line change 1
1
import project.Any.Any
2
+ import project.Data.Boolean.Boolean
2
3
import project.Nothing.Nothing
3
4
4
5
bracket : Any -> (Any -> Nothing) -> (Any -> Any) -> Any
5
6
bracket ~constructor ~destructor ~action = @Builtin_Method "Resource.bracket"
6
7
7
8
@Builtin_Type
8
9
type Managed_Resource
9
- register resource function = @Builtin_Method "Managed_Resource.register"
10
+ register obj fn system=Boolean.False = register_builtin obj fn system
10
11
finalize self = @Builtin_Method "Managed_Resource.finalize"
11
- with self ~action = @Builtin_Method "Managed_Resource.with"
12
+ with self ~action ~on_missing=Nothing = with_builtin self action on_missing
12
13
take self = @Builtin_Method "Managed_Resource.take"
14
+
15
+ register_builtin resource function system = @Builtin_Method "Managed_Resource.register_builtin"
16
+ with_builtin r action on_missing = @Builtin_Method "Managed_Resource.with_builtin"
You can’t perform that action at this time.
0 commit comments