ppetr

import java.nio._
import java.nio.channels.Channels
import java.io.{ FileInputStream, IOException }
import java.util.zip._
import scala.util.control.Exception._
import conduit._
import conduit.Pipe._

object CloseExample extends App {
    /**

hidsh

(defun open-mac (path)
  (start-process "dired-open-mac" nil "open" path))

(defun quicklook-file (path)
  (interactive)
  (defvar cur nil)
  (defvar old nil)
  (setq old cur)
  (setq cur (start-process "ql-file" nil "qlmanage" "-p" path))
  (when old (delete-process old)))

joastbg

<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
  <PropertyGroup>
    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
    <Platform Condition=" '$(Platform)' == '' ">x86</Platform>
    <ProductVersion>8.0.30703</ProductVersion>
    <SchemaVersion>2.0</SchemaVersion>
    <ProjectGuid>{a9120397-fd09-4e7f-9384-c7fd8976acc5}</ProjectGuid>
    <OutputType>Exe</OutputType>
    <RootNamespace>ApplicativeFParsec</RootNamespace>

pseudomuto

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace CI.Demo
{
    public class Feature
    {
        public string Name { get; private set; }

mavnn

using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Reflection;
using System.Runtime.Versioning;
using Microsoft.Build.Evaluation;

namespace NuGet.Common
{

denen99

package funsets

import org.scalatest.FunSuite

import org.junit.runner.RunWith
import org.scalatest.junit.JUnitRunner

/**
 * This class is a test suite for the methods in object FunSets. To run
 * the test suite, you can either:

jorgenschaefer

;; This is a bad idea.

(defun restart-process (process)
  (let ((name (process-name process))
        (buffer (process-buffer process))
        (program-and-args (process-command process))
        (sentinel (process-sentinel process))
        (filter (process-filter process))
        (new-process))
    (with-current-buffer buffer

XSockets

public class Zoo : IZoo
{
    public IList<IAnimal> Animals { get; set; }
}

public class Frog : IAnimal
{
    public string Say()
    {
        return "Riiiibbitt";

danchoi

{-# LANGUAGE Arrows, NoMonomorphismRestriction #-}
module Main where
import Text.XML.HXT.Core
import System.Environment
import Data.List
import Control.Arrow.ArrowNavigatableTree
import Text.XML.HXT.XPath.Arrows
import Data.Tree.NTree.TypeDefs
import Data.Tree.NavigatableTree.Class

chpatrick

{-# LANGUAGE TypeFamilies, KindSignatures, DataKinds, TypeOperators, GADTs, MultiParamTypeClasses, FlexibleInstances, GeneralizedNewtypeDeriving, OverlappingInstances, ScopedTypeVariables, FlexibleContexts #-}

import Control.Applicative
import Control.DeepSeq
import qualified Control.Exception as E

-- Closed type family, needs GHC HEAD.
type family Minus (e :: *) (es :: [*]) :: [*] where
  Minus e '[] = '[]
  Minus e (e ': es) = Minus e es