sharedmemory.h « kernel.soso « iso « tools - mu - Soul of a tiny new machine. More thorough tests → More comprehensible and rewrite-friendly software → More resilient society.

about summary refs log tree commit diff stats

path: root/tools/iso/kernel.soso/sharedmemory.h

blob: a4e839e1f19f0ef6707bf6fe0fb700170cdbbc73 (plain) (blame)

#ifndef SHAREDMEMORY_H
#define SHAREDMEMORY_H

#include "common.h"
#include "fs.h"

void initializeSharedMemory();
FileSystemNode* createSharedMemory(const char* name);
void destroySharedMemory(const char* name);
FileSystemNode* getSharedMemoryNode(const char* name);

#endif // SHAREDMEMORY_H

w"> demonstration of ; possibilities. (def factorial [ ((default-scope scope-address) <- new (scope literal) (30 literal)) ((n integer) <- arg) { begin base-case } recursive-case ]) (after base-case [ ; if n=0 return 1 ((zero? boolean) <- eq (n integer) (0 literal)) (break-unless (zero? boolean)) (reply (1 literal)) ]) (after recursive-case [ ; return n*factorial(n-1) ((x integer) <- sub (n integer) (1 literal)) ((subresult integer) <- factorial (x integer)) ((result integer) <- mul (subresult integer) (n integer)) (reply (result integer)) ]) (def main [ ((1 integer) <- factorial (5 literal)) (print-primitive ("result: " literal)) (print-primitive (1 integer)) (print-primitive ("\n" literal)) ])