mplisp

miniPicoLisp with FFI and modules for Buddy BDD library, OpenGL, Gtk and GMP
git clone https://logand.com/git/mplisp.git/
Log | Files | Refs

queens.ffi.c (246B)

      1 /* Generated from queens.ffi */
      2 
      3 #include "../pico.h"
      4 
      5 #include "queens.h"
      6 
      7 any cfun_queens(any ex) {
      8    any x = ex, y;
      9    x = cdr(x);
     10    y = EVAL(car(x));
     11    NeedNum(ex, y);
     12    int b1 = (int) unBox(y);
     13    int z = queens(b1);
     14    return box(z);
     15 }