テスト

投稿を試してみたい場合はこちらへどうぞ

Posted feedbacks - Nested

Flatten Hidden

test

1	int main(){return 0;}

test

日本語を含むコードのテスト

1	system.out.println("日本語を含むコードのテスト")

返信のテスト

コード

aaa

aaa

あああ

test

てすと

1	($a="\xa6\x99\xa8") =~ s/(.)/print "\xe3\x81" . $1/eg

てすとー

#include <stdio.h>
main(){
  printf("test\n");
}

テスト

begin
  require 'test'
rescue
  puts "テスト失敗"
end

テスト
てすと

if __name__ == '__main__':
	print 'ok'
	
	print 'ok2'

Re test

今気がついたのだけど、
こうすればアンケートにも使えるんじゃないだろうか。

***アンケート***
コメント本文のフォーマットは現在「無加工」が初期値になっていますが、
「整形済み」を初期値にした方がいいと思う人は「+」、
今のままで構わない人は「-」を押してください。

でも、プラスの投票があったときだけトップに出てちょっと不公平かも？
あと意見を聞き終わったら削除しないと
僕のレーティングに影響してしまうなｗ
それはアンケート用のアカウントを作ればいいのか…

まぁ、とりあえずどうなるのか試してみよう。

この方法のアンケートは
「このアンケートは締め切りました」
というのがやりにくいなー。

管理者だからコメントを書き換えてしまうことはできるけども。

無加工（自動改行・インデントなし）
整形済み（手動改行・手動インデント）
のような表現があったり、コメント本文と形式はひとつのテーブルに格納されてるとありがたいです。
今のままでも構いませんけど。。

「無加工」をやめて「空行が改段落」というモードをつけようかなぁ…。

いま無加工では普通の文章を2段落以上に書けないのでそのほうがうれしいかもしれません。それでただの改行を<br/>にすれば文章途中にコードや実行例を書くのもそんなに困らないかも（Python以外は！ですが）。

改行→<br/>、スペース→ 、でいいのかも…。

デフォルトをpreにしました＆改行を<br/>、スペースを に置き換えるモードを作りました。

この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。

いい名称募集！

この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。この投稿はその新しいモードで投稿しています。

if x:
    if y < x:
        if y < z < x:
            print "OK"

Pythonのコードも一応書ける(等幅フォントじゃないのできれいじゃないけど)

前回選んだ形式をCookieで覚えてくれれば
どちらが好きな人もうれしいのではないでしょうか．

ついでに言語のプルダウンも，
投稿したことのある言語が一番上にくると
選びやすくてうれしいです．

>前回選んだ形式をCookieで覚えてくれれば
>どちらが好きな人もうれしいのではないでしょうか．

なるほど！

>ついでに言語のプルダウンも，
>投稿したことのある言語が一番上にくると
>選びやすくてうれしいです．

それも近いうちに何とかしようと思っています。

Markdown

unordered
箇条書き

ordered
順番付き

Markdown Syntax Documentation

4スペースかタブでのインデントでコードブロック

if 0:
    print "indent!"

上記の出力は下のような入力から得られました

# Markdown

- unordered
- 箇条書き

---

1. ordered
2. 順番付き

[Markdown Syntax Documentation]
(http://daringfireball.net/projects/markdown/syntax)

4スペースかタブでのインデントでコードブロック

    if 0:
        print "indent!"

見出しタグのサイズに関してはもっと小さくする予定
本当は見出しタグを使用できなくしたいのだけども。
そういうのをオプションで切り替えられる記法があれば便利なのだけどなぁ…

強調と もっと強調

 *強調* と **もっと強調**

いま強調されているように見えないのはスタイルシートで設定されていないせいです(苦笑

URLテスト

see: Google

(lambda(y,m)=input("enter year and month (y, m)>>>"):(lambda l=[31,28+(lambda y,x=lambda y,d:y/d-(y-1)/d:x(y,4)-x(y,100)+x(y,400))(y),31,30,31,30,31,31,30,31,30,31][m-1],w=__import__("sys").stdout.write,z=lambda y,m,d:(lambda a,b:(int(m*2.6-0.2)+d+b+b/4+a/4+5*a)%7)(*divmod(y,100)):w(("%d/%d"%(y,m)).center(20)+"\n")or w(" S  M Tu  W Th  F  S \n")or[[1-(0<e<=l)and[w(" "*3)]or w("%2d "%e)for e in range(d,d+7)]and w("\n")for d in range(1-(lambda y,m,d:(m<3)and[z(y-1,m+10,d)]or[z(y,m-2,d)])(y,m,1)[0],l,7)])())()

テスト投稿

1	perl -e 'print "hello world" '

投稿のテスト。

y = [0 1 0];
for k = 1:10;
    disp(num2str(y(2:end-1)));
    y = [0 y(1:end-1)+y(2:end) 0];
end

ログインして投稿テスト。

y = [0 1 0];
for k = 1:10;
    disp(num2str(y(2:end-1)));
    y = [0 y(1:end-1)+y(2:end) 0];
end

タグを入れると投稿時にエラーになる?

なりました。
タグに"gauche" を入れて一度previewしてから投稿すると画面が崩れて、タイトルには"500" の文字が。
一度トップページに戻って確認すると、投稿は出来ているのですがタグが空になっています。
preview時にはタグはちゃんと入っています。

修正しました。
ご指摘ありがとうございます。

test

line1
line2
line3

def bingo(num)
  raise ArgumentError.new("fixnum only") unless num.kind_of? Fixnum
  raise ArgumentError.new("1 ijyou de onegai simasu") unless num >= 1

  results = []

  ary=(1..num).to_a
  ary.size.times{
    index = (rand * ary.size).to_i
    results << ary.delete_at(index)
  }

  results
end

ほげほげ

1	print join ( ', ', &diff ( 3, 1, 4, 1, 5, 9, 2, 6, 5 ) );

テスト

#define N_NUM 9

int xs[N_NUM] = {3,1,4,1,5,9,2,6,5};
int rlt[N_NUM-1];

void diff(int xs[], int rlt[]){
	int i;
	for(i=0;i<(N_NUM-1);i++){
		rlt[i] = xs[i+1] - xs[i];
	}
}

てすと

(defun outout (str)
  (let ((l (remove-if-not (lambda (s) (cl-ppcre:scan "\\." s)) (cl-ppcre:split "([^A-z-\\.]|_|\\^)" str))))
      (dolist (item l)
	(destructuring-bind (name prop _ ext)
	    (map 'list #'values
		 (nth-value 1 (cl-ppcre:scan-to-strings "[^A-z]*([A-z]*)((-small|-big|-hidden)*)\\.([A-z]*)" item)))
	  (declare (ignore _))
	  (format t "name: '~A',~,8@Text: '~A', ~,8@Tsize: ~[Small~;Normal~;Big~], ~,8@THidden: ~:[False~;True~]~%" 
		  name ext (bigp-or-small-or-nomal-p prop) (hiddenp prop))))))

(defun hiddenp (str)
  (if (cl-ppcre:scan "-hidden[\\.-]*" str) t nil))

(defun bigp-or-small-or-nomal-p (str)
  (cond ((cl-ppcre:scan "-big" str) 2) 
	((cl-ppcre:scan "-small" str) 0)
	('T 1)))

test

テスト

1	tett = "test"

テストです。

1	(code-char (1- (+ (char-code #\A)

書き込みテスト

わー

#!usr/local/bin/ruby

puts "Hello!,World!"
puts "Hi","How are u?"

text = "Hi,Hello!,How are u today?"
text.sub("H","B")
print text

i = 1
while i <= 10
  print i,"\n"
  i = i + 1
end

5.times{
puts "5回表示を繰り返すよ"
}

テストテスト。

再帰表現が大好きです。

メモリを無駄に食っても大好きです。

昨晩寝る前にFizzBuzzしたのをテストテスト。

see:

class Fixnum

  def foo
    case 0
    when self-101
      return
    when self%15
      return self.hoge('fizzbuzz')
    when self%5
      return self.hoge('buzz')
    when self%3
      return self.hoge('fizz')
    else
      return self.hoge
    end
  end

  def hoge(str=self)
    puts str
    self.next.foo
  end

end

1.foo

テストです

#!/usr/bin/perl
use strict;
use warnings;

print "Hello,World!";

ちょっとテストです．

"123" => "123"

"123" =&gt; "123"

テスト出す

(defun range (n m)
  (do ((i n (1+ i))
       (ans nil))
      ((> i m) (reverse ans))
    (setq ans (cons i ans))))

テストです

#!/usr/bin/perl

for( $i=0; $i<100; $i++ ){
 print $i;
}

テストです

1	print 'test';

テスト
テスト

test = ["テ", "ス", "ト"]

for t in test
  print t
end
print "\n"

test.each do |t|
  print t
end

test

def test
  puts test
end

test

テスト

<script language="JavaScript" type="text/javascript">
<!--
    //*******************************************************
    // jQuery テスト
    //*******************************************************
    $(document).ready(function() {
        alert("Hello world!");
    });
//-->
</script>

tesuton

ぐわ

1	(print "ぐ" (make-string 10 #\わ))

投稿してみるテスト改行とか

1 2	(define (square x) (* x x))

test

1
2
3

begin
test
end

多国語投稿のテストです。

C’est un essai d’article multingue. Un tel essai est nécessaire puisqu’on peut donner des questions accentuées.

public class CharExample {

    /**
     * @param args
     */
    public static void main(String[] args) {
        String 안녕 = "안녕";
        String سلام = "السلام عليكم";
        String çaVa = "Comment ça va ?";
        System.out.println(안녕 + سلام + çaVa);

    }
}

テストです

1	print("Hello World!");

てすとなのでテストらしく。改行とかはどうなるんかな。

1	main = do { putStr "Test\n" }

テストー

1
2
3

#!/usr/local/bin/perl

say "Hello";

てすと１

てすと２

#!/usr/bin/perl
use CGI;
use strict;

my $p = CGI->new();

if($ENV{REQUEST_METHOD} eq "POST"){
  print  $p->Vars();
}

exit;

#include<iostream>
using namespace std;

int main()
{
    cout<<"C++の投稿テストです。"<<endl;
}

テスト。

1	print "Hello Woooorld!";

テスト

import std.stdio;

void main()
{
  writef("Hello World");
}

1	echo "テスト";

テスト

1	print 'test'

テスト

int main(){

    int i = 0, j = 0;
    int count=10;
    return 0;
}

テスト投稿

int main()
{
    printf("test\n");
    return 0;
}

試しに匿名で投稿してみます。

use strict;
my $m = int(rand 3) + 4; my $n = $m + int(rand(7 - $m));
my (%board, %group);

foreach my $i (1 .. $m) {
  foreach my $j (1 .. $n) {
    my $key = $i . $j;
    $board{$key} = int(rand 2);
    print $board{$key} ? '■' : '□';
    print "\n" if $j == $n;
    my $flag = 0;
    if ($i > 1) {
      my $up_key = $key - 10;
      if ($board{$key} == $board{$up_key}) {
        foreach my $item (@{$group{$board{$key}}}) {
          if ($item =~ /$up_key/) { $item .= ":$key"; $flag = 1; }
        }
      }
    }
    if ($j > 1) {
      my $left_key = $key - 1;
      if ($board{$key} == $board{$left_key}) {
        $flag++;
        if ($flag == 1) {
          foreach my $item (@{$group{$board{$key}}}) {
            $item .= ":$key" if $item =~ /$left_key/;
          }
        } else {
          my ($same) = grep { $group{$board{$key}}->[$_] =~ /$key/ } 0 .. $#{$group{$board{$key}}};
          my ($left) = grep { $group{$board{$key}}->[$_] =~ /$left_key/ } 0 .. $#{$group{$board{$key}}};
          if ($same != $left) {
            $group{$board{$key}}->[$same] = join ':', sort
              split /:/, "$group{$board{$key}}->[$same]:$group{$board{$key}}->[$left]";
            splice(@{$group{$board{$key}}}, $left, 1);
          }
        }
      }
    }
    push @{$group{$board{$key}}}, $key unless $flag;
  }
}

print "\n□の島: ", scalar(@{$group{0}}), "\n  ", join(', ', @{$group{0}}), "\n";
print "\n■の島: ", scalar(@{$group{1}}), "\n  ", join(', ', @{$group{1}}), "\n";

テスト

1	(int )NULL = 0;

whitespaceのテスト

コードが表示されなかったので末尾にドットをつけてみた。

表示ではタブとスペースの区別がつかないので、スペースの前にS, タブの前にT, 改行(LF)の前に.をコメントとして入れてみる。

S S S T    S T    S .
.
S S S T    T    S T    T    S S S T    T    S T    T    T    T    S T    T    S T    T    T    T    S T    T    T    S S S S .
S .
S .
T    S S T    T    S S T    S T    S T    T    T    T    S S S S T    T    S T    S S T    S T    T    T    S T    S S .
S .
S .
S S S T    T    T    S S S S S T    T    S T    T    S S S T    T    S T    T    T    T    S T    T    S T    T    T    T    S T    T    T    S S S S .
S .
S .
T    S S T    T    S S S T    S S T    T    T    S S T    S S T    T    S S T    S T    S T    T    S S S S T    S T    T    S T    S T    T    .
S .
T    S .
S S S S T    S T    S .
T    S T    T    T    .
S T    S .
T    S S S T    .
T    S S T    .
S .
S T    T    T    S S S S S T    T    S T    T    S S S T    T    S T    T    T    T    S T    T    S T    T    T    T    S T    T    T    S S S S .
.
S S S T    T    S S S T    S S T    T    T    S S T    S S T    T    S S T    S T    S T    T    S S S S T    S T    T    S T    S T    T    .
S S S T    S T    S .
T    .
S S S .
.
S S S T    .
T    S S T    .
S .
S T    T    S T    T    S S S T    T    S T    T    T    T    S T    T    S T    T    T    T    S T    T    T    S S S S .
.
S S S T    T    S S T    S T    S T    T    T    T    S S S S T    T    S T    S S T    S T    T    T    S T    S S .
.
.
.

ここ面白いですね。テストさせて下さい。

1
2
3

int main() {
  cout << "Hello World!" << endl;
}

乱数生成器

template< typename T>
class CTestIterator  : public std::iterator<std::forward_iterator_tag, T>
{
    int     m_counter;      //  イテレータを区別するためのカウンタ
    T       m_value;        //  生成した乱数の値 [0, 100)
public:
    CTestIterator(int counter = 0) : m_counter(counter), m_value(0) { gen_rand(); };
public:
    T   operator*() const { return m_value; }
    CTestIterator &operator++() { gen_rand(); ++m_counter; return *this; }
    bool operator!=(const CTestIterator &x) const { return m_counter != x.m_counter; }
public:
    int     get_counter() const { return m_counter; };
protected:
    void    gen_rand() { m_value = static_cast<T>(rand() % 100); }
};

こんにちわ（´・ω・`）ノ

僕の名前はきーぼーだお☆

よろちくねｗ

int main{

printf("Hello World!");

return 0;

}

Test post first.

1	print 'hello, world.'

テスト。
hello, worldを適当に長くしてみる。

#!/bin/bash
words() {
cat << _EOD_
h
e
l
l
o
,
w
o
r
l
d
_EOD_
}

for c in `words`; do echo -n $c; done; echo -e

DouKaku?

テスト

Posted feedbacks - Nested

Markdown

Index

Feed

Other

Link

Pathtraq