/** * ops/truth.h * * Post Scarcity Software Environment: truth functions. * * Tests for truth. * * (c) 2026 Simon Brooke * Licensed under GPL version 2.0, or, at your option, any later version. */ #ifndef __psse_ops_truth_h #define __psse_ops_truth_h #include #include "memory/pointer.h" struct pso_pointer nilp( struct pso_pointer frame_pointer ); struct pso_pointer not( struct pso_pointer frame_pointer ); struct pso_pointer truep( struct pso_pointer frame_pointer ); struct pso_pointer and( struct pso_pointer frame_pointer ); struct pso_pointer or( struct pso_pointer frame_pointer ); bool c_nilp( struct pso_pointer p ); bool c_truep( struct pso_pointer p ); #define truthy(p)(!c_nilp(p)) #endif