Skip to content

Instantly share code, notes, and snippets.

sbt 'run --backend c --compile --test --genHarness --targetDir build --noCombLoop'
[info] Set current project to sdramtest (in build file:/home/zeptometer/programs/AquaCore/SDRAMTest/)
[info] Compiling 1 Scala source to /home/zeptometer/programs/AquaCore/SDRAMTest/target/scala-2.11/classes...
[error] /home/zeptometer/programs/AquaCore/SDRAMTest/src/main/scala/SdramTest.scala:8: not found: type UartIO
[error] val uart = new UartIO
[error] ^
[error] /home/zeptometer/programs/AquaCore/SDRAMTest/src/main/scala/SdramTest.scala:9: not found: type SdramIO
[error] val sdram = new SdramIO
[error] ^
[error] /home/zeptometer/programs/AquaCore/SDRAMTest/src/main/scala/SdramTest.scala:118: not found: type SdramPeripheral
@zeptometer
zeptometer / xforward.js
Created November 21, 2015 05:33
Cygwin/XでどっかからGUIを持ってくるためのjscript
var cyg = ""
var disp = ""
var user = ""
var host = ""
var cmd = ""
WScript.CreateObject("WScript.Shell").run(cyg + "\\bin\\env.exe DISPLAY=" + disp +" " +
cyg + "\\bin\\ssh.exe -Y " + user + "@" + host + " " + cmd, 0)
int main() {
int x = 1;
int y = x + 1;
#define M y + x;
x = M + y;
y = x;
return M + x;
}
#include <algorithm>
#include <iostream>
#include <vector>
using namespace std;
typedef long long int ll;
bool
satisfy(const vector<ll> &xs, ll time)
  • chiselの知見の収集
    • chisel-gaia<wasabiz>
  • 外部モジュール
    • UART[DONE]
    • SDRAM
      • コントローラ<zeptometer>
      • シミュレータ
    • (USB)
    • (VGA)
  • キャッシュ
(defun solve-1-dolist (l)
(let ((x 0))
(dolist (e l x) (setf x (+ x e)))))
(defun solve-1-loop (l)
(loop for e in l
sum e))
(defun solve-1-recur (l &optional (sum 0))
(if (null l)
(define sum (lambda (x)
(if (= x 0)
0
(+ x (sum (- x 1))))))
@zeptometer
zeptometer / a.lisp
Created April 18, 2015 03:54
GCJ 2015 Round-1A
(defpackage a
(:use :common-lisp
:iterate)
(:export :solve
:read-data))
(in-package a)
(defun read-data ()
(iter (repeat (read))
LDA $30, 12288($31)
LDA $27, 28672($31)
# main program start
STL $29, 0($30)
LDA $30, 1($30)
BSR $29, newton.479
LDA $30, -1($30)
LDL $29, 0($30)
# main program end
(import (scheme base)
(scheme write))
(define hoge 3)
(define-syntax foo
(syntax-rules (hoge)
((_ hoge)
(write "You got"))
((_ bar)