1 files changed, 4 insertions, 0 deletions
diff --git a/shell/cell.mu b/shell/cell.mu
index 8c4db86f..1aed590d 100644
--- a/shell/cell.mu
+++ b/shell/cell.mu
@@ -90,6 +90,10 @@ fn new-pair out: (addr handle cell), left: (handle cell), right: (handle cell) {
   initialize-pair out, left, right
 }
 
+fn nil out: (addr handle cell) {
+  allocate-pair out
+}
+
 fn allocate-primitive-function _out: (addr handle cell) {
   var out/eax: (addr handle cell) <- copy _out
   allocate out