Moved legacy code into archive, ready for a new rapid(?) prototype.
I may regret doing this!
This commit is contained in:
parent
09051a3e63
commit
914c35ead0
114 changed files with 165 additions and 1 deletions
|
|
@ -1,24 +0,0 @@
|
|||
/*
|
||||
* authorised.c
|
||||
*
|
||||
* For now, a dummy authorising everything.
|
||||
*
|
||||
* (c) 2021 Simon Brooke <simon@journeyman.cc>
|
||||
* Licensed under GPL version 2.0, or, at your option, any later version.
|
||||
*/
|
||||
|
||||
#include "memory/conspage.h"
|
||||
#include "memory/consspaceobject.h"
|
||||
|
||||
|
||||
/**
|
||||
* TODO: does nothing, yet. What it should do is access a magic value in the
|
||||
* runtime environment and check that it is identical to something on this `acl`
|
||||
*/
|
||||
struct cons_pointer authorised( struct cons_pointer target,
|
||||
struct cons_pointer acl ) {
|
||||
if ( nilp( acl ) ) {
|
||||
acl = pointer2cell( target ).access;
|
||||
}
|
||||
return TRUE;
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue