Skip to content

Instantly share code, notes, and snippets.

@kaze
kaze / sbcli
Created Nov 22, 2020
startup file for sbcl repl
View sbcli
#!/usr/bin/env -S sbcl --script
(load "~/quicklisp/setup")
(let ((*standard-output* (make-broadcast-stream)))
(ql:quickload "alexandria")
(ql:quickload "cl-readline"))
(defpackage :sbcli
(:use :common-lisp :cffi)
(:export sbcli *repl-version* *repl-name* *prompt* *prompt2* *ret* *config-file*
@kaze
kaze / machine.js
Last active Sep 17, 2020
Generated by XState Viz: https://xstate.js.org/viz
View machine.js
const selector = Machine({
id: 'selector',
initial: 'inactive',
context: {
items: null,
value: null,
loaded: false,
},
states: {
inactive: {
View machine.js
const submit_register = async data => data;
const update_service = assign((context, event) => {
return { service: event.data };
});
const update_language = assign((context, event) => {
return { language: event.data };
});
@kaze
kaze / machine.js
Last active Sep 14, 2020
Generated by XState Viz: https://xstate.js.org/viz
View machine.js
// login machine actions --------------------------------------------------- //
const submit_login = async (context) => {
if (!context.email) {
show_message('LOGIN_NO_EMAIL_ERROR', 'error');
}
if (!context.password) {
show_message('LOGIN_NO_PASSWORD_ERROR', 'error');
}
View machine.js
const validate = async () => null;
// validation helpers ------------------------------------------------------ //
const should_validate = (context) => {
return (context.value &&
((context.leaving && context.validate) ||
(!context.leaving && context.validated))
)
};
View machine.js
const validate = async () => null;
const should_validate = (context) => {
return (context.value &&
((context.leaving && context.validate) ||
(!context.leaving && context.validated))
)
};
const check = async (context) => {
@kaze
kaze / machine.js
Last active Aug 30, 2020
Generated by XState Viz: https://xstate.js.org/viz
View machine.js
const request = (context) => {};
const build_request_params = () => {};
const make_signal = (context) => {
const controller = new AbortController();
context.signal = controller.signal;
}
const abort_request = (context) => {
View machine.js
const resend_confirmation_machine = {
id: 'resendconfirmation',
initial: 'inactive',
states: {
inactive: {
always: '#loginform.active',
},
active: {
on: {
'resendconfirmation.email.focus': 'email',
@kaze
kaze / machine.js
Last active Sep 14, 2020
Generated by XState Viz: https://xstate.js.org/viz
View machine.js
const login_activate_signal = 'login.activate';
const login_deactivate_signal = 'login.deactivate';
const register_activate_signal = 'register.activate';
const register_deactivate_signal = 'register.deactivate';
const send_activate_login = () => {
send({ type: login_activate_signal })
};
const send_deactivate_login = () => {
View cloudSettings
{"lastUpload":"2020-08-02T08:00:33.722Z","extensionVersion":"v3.4.3"}