Skip to content

Instantly share code, notes, and snippets.

@aborg0
aborg0 / AST.puml
Last active May 22, 2023 16:48
NotGiven examples
@startuml
'https://plantuml.com/class-diagram
skinparam class {
BackgroundColor<<Disallow>> Orange
BackgroundColor<<Request>> Lime
}
interface AST
interface Type<<Request>>
@aborg0
aborg0 / FastParseMagnoliaParseCaseClass.scala
Created August 17, 2018 04:53
Using FastParse and Magnolia in order to parse case class' toString
package com.github.aborg0.caseyclassy
import fastparse.all._
import java.time.{LocalDate, LocalTime}
import fastparse.core
import language.experimental.macros
import magnolia._
@aborg0
aborg0 / gist:5397135
Created April 16, 2013 15:56
Internal Error when the KNIME config window was closed with Esc.
Exception in thread "AWT-EventQueue-0" java.lang.InternalError: couldn't create component peer
at sun.awt.windows.WComponentPeer.checkCreation(WComponentPeer.java:779)
at sun.awt.windows.WComponentPeer.<init>(WComponentPeer.java:761)
at sun.awt.windows.WCanvasPeer.<init>(WCanvasPeer.java:41)
at sun.awt.windows.WPanelPeer.<init>(WPanelPeer.java:73)
at sun.awt.windows.WWindowPeer.<init>(WWindowPeer.java:159)
at sun.awt.windows.WFramePeer.<init>(WFramePeer.java:175)
at sun.awt.windows.WEmbeddedFramePeer.<init>(WEmbeddedFramePeer.java:38)
at sun.awt.windows.WToolkit.createEmbeddedFrame(WToolkit.java:472)
at sun.awt.windows.WEmbeddedFrame.addNotify(WEmbeddedFrame.java:78)
@aborg0
aborg0 / mercury_alt.g
Created June 30, 2012 22:24
Attempt to define Mercury grammar
grammar mercury_alt;
//options {
// backtrack = true;
// memoize=true;
//}
model:
s item*;
@aborg0
aborg0 / bowling.rb
Created September 6, 2011 14:42
Ruby submission for Bowling code completion of Gild 2011
#!/usr/bin/ruby
# X = 88, 0 = 48, 9 = 57, / = 47
File.foreach(ARGV[0]) do |line|
ret = 0
prev = 0
pos = 0
(line.rstrip << " 0 0").bytes.select{|c| c!=32}.each_cons(3) {
|c, n, nn| #current, next, nextnext
if c >=48 && c < 58 #number
@aborg0
aborg0 / gist:1042945
Created June 23, 2011 16:41
Implementing event listers in F#
let tagsChangedHandlers = new ResizeArray<EventHandler<SnapshotSpanEventArgs>>()
interface ITagger<ooktokentag> with
member this.add_TagsChanged v = tagsChangedHandlers.Add v |> ignore
member this.remove_TagsChanged v = tagsChangedHandlers.Remove v |> ignore
@aborg0
aborg0 / Program.cs
Created June 6, 2011 11:23
Example C# basic client of Eureqa
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using Eureqa;
using System.Threading;
namespace BasicClient
{
class Program
package Playground
import javax.annotation.Nonnull
import javax.annotation.Nonnegative
import javax.annotation.CheckReturnValue
import edu.umd.cs.findbugs.annotations.DefaultAnnotation
/**
* User: root
* Date: 15-Nov-2009