Samuel Tardieu samueltardieu

## shorten.hs
shortenUrl :: String -> String
shortenUrl url = case splitFileName url of
  (dir, "index.html") | isLocal dir -> dir
  _                                 -> url
  where isLocal uri = isPrefixOf rootUrl uri || not (isInfixOf "://" uri)

## LockMap.java
import java.util.concurrent.ConcurrentHashMap;
import java.util.concurrent.Semaphore;

public class LockMap<Key> {

    private final ConcurrentHashMap<Key, Semaphore> map = new ConcurrentHashMap<Key, Semaphore>();

    public void lock(final Key key) throws InterruptedException {
        Semaphore sem = map.get(key);
        while (true) {

## Test.scala
object Test {
  def foo(t: Boolean) = "foo1"
  def foo(t: => Boolean) = "foo2"
}

## Factor.hs
module Factor where

import Control.Monad.State

-- We can put integer literals or quotations on the stack
data Stackable = IntLiteral Int
               | FQuotation (Factor ())

-- Shortcut name
type Stack = [Stackable]

## gist:7946839

      
              1 file
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                samueltardieu
                / gist:7946839
            
            
              Created
              December 13, 2013 16:24
            
              
                Freebox Companion pour Android
              
          
    D/FbxCompMain( 7542): launching activity for 'Téléchargements'
I/ActivityManager(  850): START u0 {cmp=fr.freebox.android.compagnon/.downloadmanager.FbxDownloadListActivity (has extras)} from pid 7542
D/FbxDownloadListActivity( 7542): called onCreate
D/FbxDownloadListActivity( 7542): tab selected
D/FbxDownloadListFragment( 7542): called onCreate
D/FbxDownloadListActivity( 7542): called onStart
D/FbxDownloadListActivity( 7542): called onResume
D/FbxHttpClientTask( 7542): got 403, application/json; charset=utf-8 on http://88.160.xxx.yyy:81/api/v1/connection/config
D/FbxHttpClientTask( 7542): called doInBackground on: http://88.160.xxx.yyy:81/api/v1/fs/ls//?countSubFolder=1&removeHidden=1


## t.rs
fn identity<T>(x: &mut T) -> &mut T {
    println!("In identity");
    x
}

fn main() {
    let mut x = 0i32;
    println!("Before assignment");
    *identity(&mut x) = { println!("Evaluating 42"); 42 };
    println!("After assignment");

## main.rs
use tokio::time::Duration;

async fn value<T>(x: T, duration: Duration) -> T {
    println!("Before sleeping in value");
    tokio::time::sleep(duration).await;
    println!("After sleeping in value");
    x
}

async fn identity<T>(x: &mut T) -> &mut T {
	shortenUrl :: String -> String
	shortenUrl url = case splitFileName url of
	(dir, "index.html") \| isLocal dir -> dir
	_ -> url
	where isLocal uri = isPrefixOf rootUrl uri \|\| not (isInfixOf "://" uri)
	import java.util.concurrent.ConcurrentHashMap;
	import java.util.concurrent.Semaphore;

	public class LockMap<Key> {

	private final ConcurrentHashMap<Key, Semaphore> map = new ConcurrentHashMap<Key, Semaphore>();

	public void lock(final Key key) throws InterruptedException {
	Semaphore sem = map.get(key);
	while (true) {
	object Test {
	def foo(t: Boolean) = "foo1"
	def foo(t: => Boolean) = "foo2"
	}
	module Factor where

	import Control.Monad.State

	-- We can put integer literals or quotations on the stack
	data Stackable = IntLiteral Int
	\| FQuotation (Factor ())

	-- Shortcut name
	type Stack = [Stackable]
	fn identity<T>(x: &mut T) -> &mut T {
	println!("In identity");
	x
	}

	fn main() {
	let mut x = 0i32;
	println!("Before assignment");
	*identity(&mut x) = { println!("Evaluating 42"); 42 };
	println!("After assignment");
	use tokio::time::Duration;

	async fn value<T>(x: T, duration: Duration) -> T {
	println!("Before sleeping in value");
	tokio::time::sleep(duration).await;
	println!("After sleeping in value");
	x
	}

	async fn identity<T>(x: &mut T) -> &mut T {