lockie

 * Package:    dev-scheme/gerbil-0.16:0
 * Repository: src_prepare-overlay
 * Upstream:   https://github.com/vyzo/gerbil
 * USE:        abi_x86_64 amd64 elibc_glibc kernel_linux sqlite xml zlib
 * FEATURES:   compressdebug preserve-libs sandbox splitdebug userpriv usersandbox
>>> Unpacking source...
>>> Unpacking gerbil-0.16.tar.gz to /var/tmp/portage/dev-scheme/gerbil-0.16/work
>>> Source unpacked in /var/tmp/portage/dev-scheme/gerbil-0.16/work
>>> Preparing source in /var/tmp/portage/dev-scheme/gerbil-0.16/work/gerbil-0.16/src ...
>>> Source prepared.

lockie

(ql:quickload :alexandria)

(defstruct test
  (number (make-array 0 :element-type 'alexandria:array-index)
   :type (simple-array alexandria:array-index (*))))

(print (make-test))

lockie

(proclaim
 '(optimize (speed 3) (safety 0) (debug 0) (compilation-speed 0) (space 0)))

(ql:quickload (list :sdl2 :cl-liballegro))

(require :sdl2)
(require :cl-liballegro)

(princ 'liballegro)
(disassemble #'al:map-rgb)

lockie

# Copyright 2019 Gentoo Authors
# Distributed under the terms of the GNU General Public License v2

EAPI=8

PYTHON_COMPAT=( pypy{3,} python{2_7,3_{4,5,6,7,8,9,10,11}} )

inherit git-r3 python-any-r1 ninja-utils llvm

DESCRIPTION="A Common Lisp with LLVM back end and interoperation with C++"

lockie

(ql:quickload :trivial-benchmark)

(proclaim '(optimize (speed 3) (safety 0) (debug 0)
            (compilation-speed 0) (space 0)))

(declaim (ftype (function (simple-vector) fixnum) sum-simple-vector))
(defun sum-simple-vector (v)
  (loop
    :with s :of-type fixnum := 0
    :for x :of-type fixnum :across v

lockie

(use-modules (ice-9 threads)
             (sdl2)
             (sdl2 events)
             (sdl2 rect)
             (sdl2 render)
             (sdl2 video))

(define window-width  640)
(define window-height 480)

lockie

/* See LICENSE file for copyright and license details. */

/*
 * appearance
 *
 * font: see http://freedesktop.org/software/fontconfig/fontconfig-user.html
 */
static char *font = "Terminess Powerline:pixelsize=24:antialias=true:autohint=true";
static int borderpx = 2;

lockie

#include <stdio.h>
#include <stdlib.h>
#include <stdbool.h>
#include "curl/curl.h"

#define OUTPUTFILE "download"
#define URL "https://http2-server-push-demo.keksi.io"

static bool setup(CURL* hnd)
{

lockie

/* compilation: gcc -o client client.c -lssl -lcrypto */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <openssl/bio.h>   /* BasicInput/Output streams */
#include <openssl/err.h>   /* errors */
#include <openssl/ssl.h>   /* core library */

#define BuffSize 1024

lockie

Опыт геймдева на Lisp

Первый блин

• Spring Lisp Game Jam 2019: Darkness Looming, racket-engine
• Lisp: Racket
• Middleware: SDL2
• Арт: Flare RPG
• Редактор карт: Tiled
• Псевдо-DSL: heroine.ss