Skip to content

Instantly share code, notes, and snippets.

Avatar
😷
Wear a mask you useless reptiles

flyx flyx

😷
Wear a mask you useless reptiles
View GitHub Profile
View main.adb
with Ada.Text_IO; use Ada.Text_IO;
with Ada.Containers.Hashed_Maps; use Ada.Containers;
with Ada.Iterator_Interfaces;
procedure Main is
package Tiles is
-- Implementation is completely hidden
type Tile_Type is private;
@flyx
flyx / Makefile
Last active Sep 17, 2015
making it work
View Makefile
# Makefile to make it work
it:
@echo > /dev/null
work:
@echo "aye!"
# support for Picard
so:
@echo "Warp 9 engaged."
.PHONY: it work so
@flyx
flyx / newcert.expect
Created Sep 12, 2015
expect script to create and sign a new OpenSSL cert/key pair
View newcert.expect
#!/usr/bin/expect -f
#
# creates a new key/cert pair with openssl and signs it with a local CA
#
# expects /etc/ssl/openssl.cnf to provide correct defaults to everything
# except the CN. Easily modifyable to handle more parameters.
#
# usage: ./newcert.key CN capass
#
# * CN: the name of your website, eg example.com
View test.nim
import macros
macro callFilter(filter: stmt, value: stmt): expr =
if value.kind == nnkStrLit:
newStmtList(
newNimNode(nnkConstSection).add(newNimNode(nnkConstDef).add(newIdentNode("filtered"), newEmptyNode(),
newCall(filter, value))),
newIdentNode("filtered"))
else:
newCall(filter, value)
View foo.cpp
class Foo {
std::move_iterator move_it;
int I;
public:
Foo(const int like_to, const std::move_iterator& move_it) :
I(like_to), move_it(move_it) {}
};
View test.pp
$debDir = "/some/path"
define localPackage ($packageName = $title) {
package {$packageName :
ensure => installed,
provider => dpkg,
source => "${debDir}/${packageName}.deb"
}
}
View dovecot.conf
passdb passwd-file {
args = /home/vmail/%d/passwd
}
passdb pam {
args = session=yes dovecot
}
userdb static {
args = uid=vmail gid=dovecot home=/home/vmail/%d/%u
View multimap.ads
with Ada.Containers.Vectors;
with Ada.Containers.Hashed_Maps;
generic
type Key_Type is private;
with package Element_Vectors is new Ada.Containers.Vectors (<>);
with function Hash (Key : Key_Type) return Ada.Containers.Hash_Type;
with function Equivalent_Keys (Left, Right : Key_Type) return Boolean;
package Multimaps is
package Parent is new Ada.Containers.Hashed_Maps
View gist:6099315
-- compilation unit 1:
generic
type T is private;
package Unit is
-- ...
end Unit;
-- compilation unit 2:
View gist:5840444
#include <iostream>
using namespace std;
struct A {
void put() {
cout << "A" << endl;
}
virtual void vPut() {
cout << "A" << endl;