青青草原综合久久大伊人导航_色综合久久天天综合_日日噜噜夜夜狠狠久久丁香五月_热久久这里只有精品

posts - 5, comments - 10, trackbacks - 0, articles - 0
  C++博客 :: 首頁(yè) :: 新隨筆 :: 聯(lián)系 :: 聚合  :: 管理

2014年7月6日

作者:flysnwoxg
c++編譯器模板解析確實(shí)很強(qiáng)大。基本上可以把編譯器看做是一個(gè)虛擬機(jī),c++模板源代碼就是被執(zhí)行的腳本代碼。
基本上你可以在編譯期實(shí)現(xiàn)任何算法。
下面是一個(gè)按照從小到大,然后從大到小對(duì)數(shù)值對(duì)排序的程序,程序使用了冒泡排序,排序在編譯期完成。
例如程序的原始輸入為: ((5,6),(1,5),(3,4))
將被從小到大排序?yàn)?nbsp; ((1,5),(3,4),(5,6))
然后被從大到小排序?yàn)?nbsp; ((5,6),(3,4),(1,5))


//author:flysnowxg 
#include "stdio.h"
//用模板表示類型,模板的實(shí)例化表示對(duì)象(如pait_t<1,2> 表示(1,2)這樣的兩個(gè)值的對(duì)象)
template<int _first,int _second>
struct pair_t{
    static const int first=_first;
    static const int second=_second;
    static void print(){printf("%d %d",first,second);}
};

//計(jì)算兩個(gè)不同的pair_t類型的實(shí)例的小于關(guān)系
template <typename T1,typename T2
struct  less_t{
    static const int first_le=T1::first<T2::first;
    static const int first_eq=T1::first==T2::first;
    static const int second_le=(first_eq&&(T1::second<T2::second));
    static const int result=first_le || second_le;
};

//計(jì)算兩個(gè)不同的pair_t類型的實(shí)例的大于關(guān)系
template <typename T1,typename T2
struct  greate_t{
    static const int result=!less_t<T1,T2>::result;
};

struct null_t;
//類型列表
template <typename T1,typename T2struct list_t;
template <typename T>
struct list_t<T,null_t>{
    typedef T value;
    typedef null_t next;
};
template <typename T1,typename T2,typename T3>
struct list_t<T1,list_t<T2,T3> >
{
    typedef T1 value;
    typedef list_t<T2,T3next
};
#define list_t1(e1list_t<e1,null_t>
#define list_t2(e1,e2list_t<e1,list_t1(e2)>
#define list_t3(e1,e2,e3list_t<e1,list_t2(e2,e3)>
#define list_t4(e1,e2,e3,e4list_t<e1,list_t3(e2,e3,e4)>
#define list_t5(e1,e2,e3,e4,e5list_t<e1,list_t4(e2,e3,e4,e5)>
#define list_t6(e1,e2,e3,e4,e5,e6list_t<e1,list_t5(e2,e3,e4,e5,e6)>
#define list_t7(e1,e2,e3,e4,e5,e6,e7list_t<e1,list_t6(e2,e3,e4,e5,e6,e7)>
#define list_t8(e1,e2,e3,e4,e5,e6,e7,e8list_t<e1,list_t7(e2,e3,e4,e5,e6,e7,e8)>
#define list_t9(e1,e2,e3,e4,e5,e6,e7,e8,e9list_t<e1,list_t8(e2,e3,e4,e5,e6,e7,e8,e9)>
#define list_t10(e1,e2,e3,e4,e5,e6,e7,e8,e9,e10list_t<e1,list_t9(e2,e3,e4,e5,e6,e7,e8,e9,e10)>

//遞歸打印類型列表中每個(gè)類型的值
template<typename Tstruct print_t;
template<typename T>
struct print_t<list_t<T,null_t>>
{
    typedef typename T result;
    static void print(){
        printf("\nelem::");
        result::print();
    }
};
template<typename T1,typename T2>
struct print_t<list_t<T1,T2>>
{
    typedef typename T1 result;
    static void print(){
        printf("\nelem::");
        result::print();
        print_t<T2>::print();
    }
};

//冒泡排序算法
template<typename T,template <typename,typenameclass CompareTstruct sort_t;
template<typename T,template <typename,typenameclass CompareT>
struct sort_t<list_t<T,null_t> ,CompareT>{
    typedef list_t<T,null_tsort_head;
    typedef T least_elem;
    typedef null_t remainder;
    typedef list_t<T,null_tresult;
};
template<typename T1,typename T2,template <typename,typenameclass CompareT>
struct sort_t<list_t<T1,T2>,CompareT>{
    template<bool _b_swapstruct swap_t{
        typedef list_t<T1,T2result;
    };
    template<> struct swap_t<false>{
        typedef list_t<typename T2::value,list_t<T1,typename T2::next> > result;
    };
    static const int order=!CompareT<T1,T2::value>::result;
    typedef typename swap_t<order>::result sort_head;//假如CompareT是less_t,將開頭兩個(gè)元素中大的放前面,小的放后面
    typedef typename sort_t<typename sort_head::next,CompareT>::least_elem least_elem;//假如CompareT是less_t,獲取列表中最小的元素
    typedef list_t<typename sort_head::value,typename sort_t<typename sort_head::next,CompareT>::remainderremainder;//去掉末尾那個(gè)最小元素
    typedef list_t<least_elem,typename sort_t<remainder,CompareT>::resultresult;//將最小元素和剩余已經(jīng)排好序的元素鏈表組成一個(gè)新鏈表
}; 
int main(int argccharargv[])
{
    typedef pair_t<50,6> e1_t;
    typedef pair_t<9,10> e2_t;
    typedef pair_t<1,2> e3_t;
    typedef pair_t<7,8> e4_t;
    typedef pair_t<3,4> e5_t;
    typedef pair_t<-6,4> e6_t;

    typedef list_t6(e1_t,e2_t,e3_t,e4_t,e5_t,e6_tdate_t;
    printf("原始數(shù)據(jù):");
    print_t<date_t>::print();

    typedef sort_t<date_t,less_t>::result data_ta;
    printf("\n\n從小到大:");
    print_t<data_ta>::print();

    typedef sort_t<date_t,greate_t>::result data_tb;
    printf("\n\n從大到小:");
    print_t<data_tb>::print();
 
最后的輸出:
原始數(shù)據(jù):
elem::50 6
elem::9 10
elem::1 2
elem::7 8
elem::3 4
elem::-6 4
從小到大:
elem::-6 4
elem::1 2
elem::3 4
elem::7 8
elem::9 10
elem::50 6
從大到小:
elem::50 6
elem::9 10
elem::7 8
elem::3 4
elem::1 2
elem::-6 4

posted @ 2014-07-06 16:47 flysnowxg 閱讀(2612) | 評(píng)論 (1)編輯 收藏

2013年11月28日

lisp是一種神奇的語(yǔ)言,scheme是lisp的一種方言。
tinyscheme是一個(gè)scheme語(yǔ)言的解釋器實(shí)現(xiàn),而這是我大幅修改并加了注釋后的tinyscheme(基于tinyscheme1.41)
代碼地址:http://flysnowxg.googlecode.com/svn/tinyscheme_note
原始代碼: http://tinyscheme.sourceforge.net/home.html
tinyscheme據(jù)說(shuō)是實(shí)現(xiàn)的r5rs標(biāo)準(zhǔn)(應(yīng)當(dāng)是實(shí)現(xiàn)了一部分,因?yàn)槟J狡ヅ浜驼Z(yǔ)法定義的那部分顯然沒(méi)實(shí)現(xiàn))
tinyscheme代碼很簡(jiǎn)短而且實(shí)現(xiàn)的語(yǔ)言功能還算比較完整,如果想研究一個(gè)lisp解釋器的實(shí)現(xiàn),tinyscheme是值得研究的
tinyscheme實(shí)現(xiàn)了lambda、宏、延續(xù)、異常、gc這些重要的語(yǔ)言機(jī)制,還實(shí)現(xiàn)了許多庫(kù)函數(shù),整個(gè)原版代碼大約有6500行左右,但是原版代碼有很多的宏定義和很多冗余的代碼,代碼分類也很混亂,可讀性不算特別好,在閱讀過(guò)程中我對(duì)這個(gè)代碼進(jìn)行了大量的修改,清除了大量冗余代碼,重新組織了代碼結(jié)構(gòu),主要的實(shí)現(xiàn)文件scheme.c被我從5000行改到只有3400行。所有代碼加起來(lái)也只有4500行了,功能損失也不太多
修改一些bug,比如像‘延續(xù)’的實(shí)現(xiàn),原版像下面這樣的代碼中, “(r 1)”這一句是沒(méi)法運(yùn)行的
(define r 0)
(let ((x 1))
 (set! x
  (+ x
   (call/cc (lambda (c) (set! r c) (+ 44 (c 1)))))
 )
 (display x))
(r 1)

有興趣的可以看一看!

posted @ 2013-11-28 17:55 flysnowxg 閱讀(2697) | 評(píng)論 (0)編輯 收藏

2013年9月2日

這是我用c++寫的一個(gè)簡(jiǎn)單的腳本語(yǔ)言,非常簡(jiǎn)短,不到3000行代碼


sil語(yǔ)言(simple interpretative lanuage)是一個(gè)簡(jiǎn)單的腳本語(yǔ)言,只是一個(gè)玩具,目的是演示用簡(jiǎn)短的代碼去創(chuàng)建一個(gè)可用的腳本語(yǔ)言
這樣一個(gè)玩具會(huì)是怎么樣的呢?
sil的設(shè)計(jì)目標(biāo):
1 . 非常容易將sil解釋器嵌入到c++代碼中
2 . 非常容易用c++代碼來(lái)擴(kuò)展sil的函數(shù)調(diào)用,使得c++和sil腳本非常容易交互
3 . 成為一個(gè)有簡(jiǎn)潔語(yǔ)法的動(dòng)態(tài)語(yǔ)言,有容易使用的語(yǔ)法
4 . 擁有一個(gè)語(yǔ)言一般都應(yīng)當(dāng)擁有的語(yǔ)法

sil語(yǔ)法的完整定義可參考《sil語(yǔ)法說(shuō)明》。
sil語(yǔ)言是動(dòng)態(tài)類型的,編譯時(shí)不會(huì)檢查函數(shù)的參數(shù)個(gè)數(shù),參數(shù)類型是否合適,甚至不會(huì)檢查函數(shù)定義是否存在,只有到了運(yùn)行時(shí)才會(huì)查找函數(shù),檢查參數(shù)個(gè)數(shù)是否匹配。
對(duì)于內(nèi)置函數(shù)還會(huì)檢查參數(shù)類型是否匹配,如果不匹配會(huì)試著進(jìn)行參數(shù)類型轉(zhuǎn)換
對(duì)于用戶定義函數(shù),不會(huì)進(jìn)行參數(shù)類型匹配的檢查
第一節(jié) 語(yǔ)法:
1. 類型:
 sil暫時(shí)支持整形,浮點(diǎn)型,字符串三種數(shù)據(jù)類型,暫時(shí)不支持?jǐn)?shù)組,也不支持自定義類型(這兩點(diǎn)是比較嚴(yán)重的缺點(diǎn))
 sil是弱類型的,變量不會(huì)和類型綁定
 變量定義像是這樣的:
 var vi=1; //定義一個(gè)值為整數(shù)1的變量vi
 var vf=1.0;//定義一個(gè)值為浮點(diǎn)數(shù)1.0的變量vf
 var vs="1.0";//定義一個(gè)值為字符串"1.0"的字符串vs
 
2. 函數(shù)
 sil是弱類型的,所以定義函數(shù)時(shí)不需要聲明形參的類型,支持return語(yǔ)句
 函數(shù)像這樣定義:
 function myfun(str)
 {
  print(str);
  return 0;
  print("after return\n");
 }
 函數(shù)像這樣調(diào)用:myfun("hello sil");
 
3. 分支
 sil支持if else 語(yǔ)句,
 像這樣:
 var i=read();
 if(i==1) print("a");
 else if(i==2)
 {
  print("b");
 }
 else print("c");
 
4. 循環(huán)
 sil支持while和for循環(huán),支持continue,break語(yǔ)句
 while像這樣:
 var i=1;
 while(true)
 {
  print("hello sil\n");
  i=i+1;
  if(i>5) break;
  if(i<3) continue;
  print("after continue\n");
 }
 for循環(huán)像這樣
 for(var i=0;i<5;i=i+1) print(i+"\n");

5. 基本運(yùn)算符
 比較運(yùn)算支持 == != > <
 算術(shù)運(yùn)算支持 + - * / % ,還支持一元 -
 邏輯運(yùn)算支持 !  && ||
 支持括號(hào) ( ) 改變求值順序
 算符優(yōu)先級(jí)和c中一樣
 
5. 內(nèi)置函數(shù)
 sil類內(nèi)置函數(shù)是非常少的,詳見函數(shù)說(shuō)明,以下列出兩個(gè)比較重要的。
 eval 可對(duì)一個(gè)字符串形式的sil代碼求值
 例如 eval("for(var i=0;i<5;i=i+1)print(i);");
 load 可以加載一個(gè)sil代碼文件,代碼文件中亦可遞歸調(diào)用load函數(shù)
 
6. c++嵌入和擴(kuò)展
 寥寥數(shù)行代碼即可將sil嵌入到c++中
 一個(gè)c函數(shù)只要形參和返回值類型是int float string,簡(jiǎn)單調(diào)用一個(gè)register_function即可將函數(shù)注冊(cè)到sil中,腳本即可方便的調(diào)用這些擴(kuò)展函數(shù)
 extern工程中的代碼示例了如何對(duì)sil提供文件讀寫函數(shù)的支持
 
第二節(jié) 源代碼
 這是一個(gè)用vs2008創(chuàng)建的工程,由于使用了shared_ptr,如果給vs2005引入shared_ptr的支持亦可在vs2005下編譯通過(guò)
 src目錄下是sil語(yǔ)言用c++實(shí)現(xiàn)的內(nèi)核
 consle目錄下是sil語(yǔ)言的命令行解釋器
 extern目錄下是一個(gè)例子,演示了如何擴(kuò)展sil的內(nèi)置函數(shù)
 lib目錄下是用sil寫的庫(kù)代碼和一些測(cè)試代碼,但是現(xiàn)在只有簡(jiǎn)單的測(cè)試代碼(里面有一個(gè)開平方根和求圓周率的有意思的例子)
 doc目錄下是文檔
 bin目錄下是可執(zhí)行文件
 
第三節(jié) 函數(shù)說(shuō)明
 to_int 將一個(gè)值轉(zhuǎn)換為int類型,例如:to_int("123");
 to_float 將一個(gè)值轉(zhuǎn)換為float類型,例如:to_float(2);
 to_string 將一個(gè)值轉(zhuǎn)換為string類型,例如:to_string(254);
 strlen 求字符串的長(zhǎng)度,例如:strlen("hello");
 substr 截取字符串的的一部分,例如:substr("hello",1,3);
 eval 可以求值一個(gè)字符串形式的表達(dá)式,例如:  var code="1+2*3";eval(code);
 load 可以加載并執(zhí)行一個(gè)sil代碼的文件,例如: load("../lib/math_test.sil");
 exit 終止腳本的執(zhí)行,例如:print("hello");exit();print("world");
 print 打印一個(gè)值,例如:print("hello world"+3);
 read 可以從控制臺(tái)讀取一個(gè)字符串,例如:var tmp=read();print(tmp);
 bat 可以執(zhí)行一個(gè)windows命令,例如:bat("dir");
 list_function 打印已經(jīng)定義的內(nèi)置函數(shù)和腳本函數(shù),例如:list_funciton();
 list_asm_code 打印編譯出的代碼,例如:list_asm_code();
 set_sil 可以設(shè)置解釋器的一些開關(guān),例如:set_sil("",0);
 help 顯示幫助信息,例如:help();

posted @ 2013-09-02 15:45 flysnowxg 閱讀(3384) | 評(píng)論 (9)編輯 收藏

2012年5月17日

什么時(shí)候動(dòng)筆?

posted @ 2012-05-17 22:25 flysnowxg 閱讀(404) | 評(píng)論 (0)編輯 收藏

2012年4月29日

!

posted @ 2012-04-29 17:32 flysnowxg 閱讀(310) | 評(píng)論 (0)編輯 收藏

青青草原综合久久大伊人导航_色综合久久天天综合_日日噜噜夜夜狠狠久久丁香五月_热久久这里只有精品
  • <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>
    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>
            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>
            蜜臀久久久99精品久久久久久| 亚洲人体大胆视频| 美女999久久久精品视频| 久久久久久日产精品| 久久免费视频在线| 看片网站欧美日韩| 欧美激情91| 欧美午夜无遮挡| 国产美女一区| 亚洲国产精品久久久久秋霞影院| 亚洲黄色成人网| 99视频精品免费观看| 亚洲影院一区| 欧美h视频在线| 99热在这里有精品免费| 亚洲一区二区精品| 免费短视频成人日韩| 欧美视频在线观看 亚洲欧| 国产午夜精品视频| 夜夜嗨av一区二区三区四季av| 亚洲欧美日韩一区| 欧美国产一区视频在线观看| 亚洲午夜国产一区99re久久| 久久亚洲私人国产精品va| 欧美日韩国产三区| 激情成人中文字幕| 亚洲一区二区精品| 免费不卡在线观看| 亚洲少妇诱惑| 欧美.www| 狠狠色丁香婷婷综合| 亚洲无玛一区| 亚洲国产精品精华液2区45| 亚洲午夜精品在线| 欧美激情第1页| 亚洲第一视频| 久久婷婷国产综合国色天香| 亚洲视频在线观看一区| 欧美成人综合| 亚洲电影第三页| 久久精品盗摄| 亚洲欧美激情诱惑| 国产精品国产精品国产专区不蜜| 亚洲一区一卡| av成人老司机| 欧美激情 亚洲a∨综合| 亚洲影视中文字幕| 欧美体内she精视频| 亚洲毛片av在线| 亚洲国产91| 欧美wwwwww| 亚洲精品视频在线| 欧美成人在线网站| 久久亚洲电影| 亚洲国产成人tv| 母乳一区在线观看| 麻豆视频一区二区| 亚洲欧洲精品成人久久奇米网| 久久这里有精品15一区二区三区| 欧美一区二区三区免费观看| 国产日韩欧美a| 久久亚洲影音av资源网| 久久精品亚洲精品| 在线观看日韩一区| 亚洲黄色片网站| 欧美日韩一区二区在线播放| 一区二区三区国产精华| 91久久在线观看| 欧美日韩在线三级| 欧美日韩直播| 亚洲一区二区三区在线观看视频| 欧美激情一区二区三区| 欧美成人免费网| 国产精品99久久久久久久久| 一区二区三区国产精品| 国产精品综合| 欧美91福利在线观看| 欧美福利在线| 午夜精品99久久免费| 西西裸体人体做爰大胆久久久| 国产一区高清视频| 亚洲第一中文字幕| 国产精品久久久久久五月尺| 久久亚洲色图| 欧美日韩国产免费| 久久久777| 欧美日韩欧美一区二区| 久久精品国产亚洲精品| 欧美成人午夜| 欧美怡红院视频| 欧美成人精品一区二区三区| 亚洲在线免费| 久久婷婷久久一区二区三区| 日韩一二在线观看| 欧美一区二区三区另类 | 欧美视频一区二| 久久嫩草精品久久久久| 欧美精品在线观看91| 久久久久久97三级| 欧美久久视频| 久久婷婷麻豆| 国产精品乱码妇女bbbb| 精品99视频| 日韩亚洲欧美一区| 欧美在线免费视屏| 亚洲视频一区二区免费在线观看| 欧美一区=区| 亚洲一二三区在线| 久久综合色播五月| 欧美一区二区三区视频免费播放| 欧美xart系列高清| 久久免费国产精品1| 欧美日韩一区二区三区在线看 | 午夜精品剧场| 欧美久久久久| 欧美不卡三区| 黄色一区二区在线观看| 亚洲影院在线观看| 亚洲午夜久久久久久尤物| 免费欧美在线视频| 久久一区二区三区四区五区| 欧美午夜宅男影院在线观看| 亚洲国产一成人久久精品| 在线免费观看日本一区| 久久精品一区二区| 久久久免费av| 黑人巨大精品欧美一区二区小视频 | 亚洲小说欧美另类婷婷| 夜夜躁日日躁狠狠久久88av| 免费视频一区| 欧美国产综合一区二区| 在线免费观看一区二区三区| 欧美一区二区三区在线看| 午夜精品久久久| 国产精品视频一区二区三区| 一本大道久久a久久精品综合| 99在线|亚洲一区二区| 欧美精选午夜久久久乱码6080| 亚洲日本中文字幕区| 一区二区av| 国产精品久久久久久超碰| 亚洲视频在线观看三级| 欧美一区二区在线免费观看| 国产日韩欧美一二三区| 久久不射中文字幕| 狂野欧美激情性xxxx| 亚洲国产成人av好男人在线观看| 美玉足脚交一区二区三区图片| 亚洲高清一区二| 亚洲性感激情| 国产一区二区三区久久久久久久久| 欧美在线黄色| 欧美福利一区二区| 一本色道久久综合亚洲精品不 | 亚洲激情视频网| 欧美区一区二区三区| 亚洲天堂成人| 猫咪成人在线观看| 日韩一本二本av| 国产日韩欧美一区二区| 久久一区二区三区超碰国产精品| 亚洲福利在线视频| 又紧又大又爽精品一区二区| 美女视频黄a大片欧美| 欧美日韩国产在线看| 一区二区电影免费观看| 欧美一区二区三区在| 亚洲第一精品夜夜躁人人爽| 欧美日韩精品系列| 欧美网站在线观看| 亚洲欧美偷拍卡通变态| 男人插女人欧美| 中日韩男男gay无套| 狠狠色狠狠色综合日日91app| 欧美高清视频在线观看| 午夜久久影院| 亚洲美女尤物影院| 久久综合久久综合九色| 一级日韩一区在线观看| 狠狠色丁香久久综合频道| 欧美日韩国产麻豆| 久久婷婷久久一区二区三区| 一区二区三区导航| 欧美高清一区二区| 欧美伊人久久久久久午夜久久久久 | 91久久亚洲| 久久久亚洲精品一区二区三区| 99国产精品久久久久久久成人热| 国产一区二区高清不卡| 欧美涩涩网站| 欧美成在线观看| 久久精品夜色噜噜亚洲a∨| 一本色道久久99精品综合| 亚洲电影第三页| 美女视频黄 久久| 久久久久成人精品| 午夜精品一区二区三区四区| 99精品欧美一区二区三区综合在线| 在线成人av.com| 伊人久久久大香线蕉综合直播|