This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#include <stdio.h> | |
#include <stdint.h> | |
#include <stdlib.h> | |
#include <unistd.h> | |
#include <string.h> | |
#include <errno.h> | |
#include <sys/mman.h> | |
int main(int argc, char *argv[]) { | |
unsigned int pagesize; |
This file has been truncated, but you can view the full file.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
KLUv/QSIxOILrBEVLmdpdC8AMDc1NTE3NTAAMTM2MTAxNDY3NjQAMDEwMDU3ACA1AHVzdGFyICAA | |
a2xtYnJhbmNoZXMvMDU0MjYyNTYxNjQ1aG9vazIwM2FwcGx5cGF0Y2gtbXNnLnNhbXBsZTczNjUz | |
IDAjIS9iaW4vc2gKIwojIEFuIGV4ICBzY3JpcHQgdG8gY2sgdGhlIGNvbW1pdCBsb2cgbWVzc2Fn | |
ZSB0YWtlbiBieSBmcm9tIGEtbWFpbC5UaGhvdWxkd2l0aCBub24temVybyB0dXMgYWZ0ZXIgaXNz | |
dWluZ3JvcHJpYXRlaWYgYW50c29wLiBsbG93ZWRlZGZpbG5hYmxlaXMsIHJtIiIuCgouIC1zaC1z | |
ZXR1cAo9IiQodi1wYXJzZSAtLSkiCnRlc3QgLXggIiQiICYmZWMkezErIiRAIn0KOgoxNjQ0NjIu | |
Q2J5ICIib25lIGFyZ3VtZW50LG9mdGhhdCBoYXNVbmJlYWRkIGEgU2lnbmVkLW9mZi1saW5Eb2kg | |
YmFkIGlkZWFnZW5lcmFsLCBidXByZWUtbW9yZSB0U09CPXZHSVRfQVVUSE9SX0lERU5UIHwgcy1u | |
ICdzL15cKC4qPlwpLiokLzogXDEvcCcpZyAtcXMgIl4kIjEiIHx8IGVjaD4+CmMgZHVwbGllcyIi | |
ID0oJ14nCgkgc29ydHVuaXEgLWNlICcvXlsgCV0qMS9kJyl7Cgk+JjIgRAkxCn0KZnNtb25pdG9y |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;(define cal (with-input-from-file "v2020.scm" read)) | |
;;2020 | |
(define cal | |
`( | |
;;w mtotfls | |
( 5 dfaadff) | |
(23 dfnnfff) | |
)) | |
(import chicken.io |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#include <windows.h> | |
#include <stdio.h> | |
int screen_w() { | |
return GetSystemMetrics(SM_CXVIRTUALSCREEN) | |
- GetSystemMetrics(SM_XVIRTUALSCREEN); | |
} | |
int screen_h() { |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(use minissh nrepl) | |
;; the default /dev/random causes hangs | |
(use tweetnacl) (current-entropy-port (open-input-file "/dev/urandom")) | |
;; the secret key would normally be kept safe | |
(define host-pk | |
"AAAAC3NzaC1lZDI1NTE5AAAAIIfd+rbtTF2hJJbnnbQxtp2UVrUWkQtnsT8CL9iLpZBZ") | |
(define host-sk | |
#${ba72291c15494ee02003b3c0bb0f8507a6a803850aa811d015b141a193e2447d |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;; generator function example, inspired by this post: | |
;;; http://matt.might.net/articles/programming-with-continuations--exceptions-backtracking-search-threads-generators-coroutines/ | |
;;; | |
;;; Kristian Lein-Mathisen 2017 | |
(import (scheme small)) | |
; current-continuation : -> continuation | |
(define (current-continuation) | |
(call-with-current-continuation |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// show an image in the terminal using ascii colors | |
// demonstrates raw pixel access | |
// (only works on certain image file types, though) | |
#include <stdio.h> | |
#include <FreeImage.h> | |
int meta(FIBITMAP *dib) { | |
FITAG *tag = NULL; | |
FIMETADATA *mdhandle = NULL; | |
mdhandle = FreeImage_FindFirstMetadata(FIMD_EXIF_MAIN, dib, &tag); |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; a nicer alist api | |
(define (aref alst key #!optional (missing (lambda () #f)) (= equal?)) | |
(let loop ((alst alst)) | |
(if (pair? alst) | |
(if (= (caar alst) key) (cdar alst) (loop (cdr alst))) | |
(if (procedure? missing) (missing) missing)))) | |
(define (adel alst key #!optional (= equal?)) | |
(alist-delete key alst =)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[u2@user1-pc chicken-android-template-master]$ export PATH=$PATH:/home/u2/android/android-ndk-r11c:/home/u2/android/android-sdk-linux/platform-tools: | |
[u2@user1-pc chicken-android-template-master]$ export ANDROID_HOME=/home/u2/android/android-sdk-linux | |
[u2@user1-pc chicken-android-template-master]$ make | |
Warning: excluded identifier doesn't exist in module chicken: define-macro | |
make -C jni/chicken # should build the cross-chicken | |
make[1]: Entering directory '/home/u2/Desktop/chicken-android-template-master/jni/chicken' | |
Warning: excluded identifier doesn't exist in module chicken: define-macro | |
echo /home/u2/Desktop/chicken-android-template-master/jni/chicken/chicken-core/ |