This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (ql:quickload 'str) | |
| (defpackage #:cl-wordcut | |
| (:use #:cl) | |
| (:import-from #:str :join)) | |
| (in-package #:cl-wordcut) | |
| (declaim (optimize (speed 3) (debug 0) (safety 0))) | |
| (defconstant +default-dix-ptr-size+ 1024) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (mapcar #'(lambda (tu) | |
| (cons (cons :initial-phrase-pairs (find-initial-phrase-pairs tu)) | |
| tu)) ...) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ################################## | |
| # ____________________________ | |
| # ( _________________________) | |
| # ) (__ _ _ _ _ | |
| # ( __)( \/ )( \/\/ )/\/\ | |
| # ) ( \ / \ // \ | |
| # (___) \/ \/\/(_/\/\_) 2.6 | |
| # | |
| # | |
| # This is the default configuration file shipped with fvwm. |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /mosesdecoder/scripts/training/train-model.perl | |
| --external-bin-dir /mgiza/mgizapp/inst | |
| --mgiza | |
| --corpus /work/e1/a | |
| --f en | |
| --e th | |
| --lm 0:8:/work/data/train-true-case-th.klm |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/bin/sh | |
| apt-get update | |
| apt-get install -y \ | |
| apt-transport-https \ | |
| ca-certificates \ | |
| curl \ | |
| gnupg2 \ | |
| software-properties-common | |
| curl -fsSL https://download.docker.com/linux/debian/gpg | apt-key add - | |
| apt-key fingerprint 0EBFCD88 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (require '[clojure.data.xml :as xml] | |
| '[clojure.string :as str] | |
| '[clojure.java.io :as io]) | |
| (defn ext-segs [segs] | |
| (->> segs | |
| (mapcat :content) | |
| (str/join " "))) | |
| (defn ext-tuv [tuv] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/bin/sh | |
| docker run \ | |
| --rm \ | |
| -it \ | |
| -u $(ls -n README.md | awk '{ print $3; }') \ | |
| --net=host \ | |
| -v $(pwd):/work \ | |
| -e HOME=/work \ | |
| -w /work \ |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ;; This file: pkg-install.el | |
| ;; | |
| ;; How to run this: | |
| ;; emacs --batch --load pkg-install.el | |
| (require 'package) | |
| (add-to-list 'package-archives | |
| '("melpa" . "https://melpa.org/packages/")) | |
| (package-initialize) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (require 'package) | |
| (let* ((no-ssl (and (memq system-type '(windows-nt ms-dos)) | |
| (not (gnutls-available-p)))) | |
| (proto (if no-ssl "http" "https"))) | |
| (when no-ssl | |
| (warn "\ | |
| Your version of Emacs does not support SSL connections, | |
| which is unsafe because it allows man-in-the-middle attacks. | |
| There are two things you can do about this warning: | |
| 1. Install an Emacs version that does support SSL and be safe. |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (require 'package) | |
| (add-to-list 'package-archives | |
| '("melpa" . "https://melpa.org/packages/")) | |
| (package-initialize) | |
| (ergoemacs-mode) |