All New

Register

Login

All gists

capitalex / mutable-stack.mth

0 likes

0 forks

1 files

Last active 1737485783

1	module float-buffer.main
2
3	import std.prelude
4	import std.world
5	import std.buffer
6	import std.maybe
7
8	struct +Stack(a) {
9	+buffer: +Buffer
10	top: IOffset

capitalex / alta.lua

0 likes

0 forks

1 files

Last active 1737145532

1	local function tokenize(string)
2	local tokens, current_symbol, current_token = {}, {}, {}
3
4	local function push_token()
5	if #current_token ~= 0 then
6	table.insert(current_symbol, table.concat(current_token))
7	current_token = {}
8	end
9	end
10

yumaikas / lspace.lua

0 likes

0 forks

2 files

Last active 1737091028

1	local Space = require("lspace")
2	local enemies = {}
3	local r, f, l, box, tuples, rules = Space()
4
5	local function p(...)
6	local args = {...}
7	return function() print(table.unpack(args)) end
8	end
9
10	function espawn(vars)

capitalex / search-for-value.triplicate

0 likes

0 forks

1 files

Last active 1736309097

1	= requests =
2	restore - group - $group
3	restore - field - $field
4	temporary - $group - $value
5	= response =
6	restore - group - $group
7	restore - field - $field
8	$group - $field - $value
9
10	= request =

yumaikas / parse_alta.py

0 likes

0 forks

1 files

Last active 1736230132

1	#! /bin/env python3
2
3	import re
4	from collections import namedtuple
5
6	Pattern = namedtuple("Pattern", ["stack", "value"])
7	Rule = namedtuple("Rule", ["pattern", "consequence"])
8
9	def parse(code):
10	idx = 0

yumaikas / parse_alta.lua

0 likes

0 forks

1 files

Last active 1736227479

1	local alta = {}
2
3	function alta.parse(code)
4	local idx = 1
5	local STATE_FIND_OUTER_DELIM = "find/outer-delim"
6	local STATE_FIND_INNER_DELIM = "find/inner-delim"
7	local STATE_READ_STACK_NAME = "read/stack-name"
8	local STATE_READ_VALUE_NAME = "read/value-name"
9
10	local state = STATE_FIND_OUTER_DELIM

capitalex / three-in-a-row.bytetable

0 likes

0 forks

1 files

Last active 1735921361

1	% search for 3 matching columns
2
3	------------
4	% if we've reach the end of our spread sheet
5	% end our search in failure
6	[* 1 2]
7	[1 x 1]
8	[* 1 2 3]
9	[x -1 -1 -1]
10	------------

yumaikas / funnyMaze.scm

0 likes

0 forks

1 files

Last active 1735792357

A random maze solver written in Chicken Scheme

1	(use ncurses posix extras posix-extras loops)
2	(define mazeData
3	(vector "OOOOOOOOOOOOOOO"
4	"O O O OOO O OO"
5	"O O"
6	"O O OOOOOOO O O"
7	"O O O O O"
8	"O OOO OO OOOO"
9	"O O O O"
10	"OO O O O OOO OO"

capitalex / old_dialogue.gd

0 likes

0 forks

1 files

Last active 1735703845

1	extends Sequence
2
3	func setup():
4	backdrop_image('qs-background', preload('res://imgs/events/QuickShot00_background.png'))
5	backdrop_image('qs-table', preload('res://imgs/events/QuickShot01_table.png'))
6	backdrop_image('qs-guy', preload('res://imgs/events/QuickShot02_guy.png'))
7
8	func intro():
9	fade_out()

yumaikas / derp.comp.tiny.js

0 likes

0 forks

3 files

Last active 1735630099

1	return function() {
2	let min = Math.min; var max = Math.max; var huge = Number.MAX_SAFE_INTEGER;
3	let self = { state: { strings: [], slots: {} } };
4
5
6	self.counters = {
7	"loop": 1,
8	}
9
10	function match(self, counters) {

Powered by Opengist ⋅ Load: 236ms⋅

English