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

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>
            国产精品久久久久久久久久久久久 | 国产一区免费视频| 欧美一级理论性理论a| 亚洲视频一二| 国产亚洲一本大道中文在线| 久久视频在线视频| 欧美成人免费全部观看天天性色| aa国产精品| 香蕉久久a毛片| 亚洲黄页一区| 国产精品99久久99久久久二8| 国产精品毛片| 免费不卡在线观看| 欧美日韩一区二区三区| 欧美亚洲免费电影| 免费欧美在线视频| 亚洲欧美日本伦理| 久久免费视频在线观看| 一区二区三区日韩欧美| 欧美在线观看视频一区二区三区| 亚洲激情国产精品| 亚洲欧美综合一区| 亚洲精品一区二区三区福利| 亚洲网站在线观看| 亚洲人www| 亚洲欧美综合国产精品一区| 亚洲每日在线| 欧美在线视频免费| 亚洲五月六月| 欧美fxxxxxx另类| 久久国产精品久久久| 欧美激情精品久久久久久大尺度| 香蕉久久a毛片| 欧美成人一品| 久久综合狠狠综合久久激情| 欧美午夜宅男影院| 欧美成人一区二免费视频软件| 欧美午夜精品久久久| 国产欧美91| 在线视频亚洲一区| 老巨人导航500精品| 欧美一区二区三区日韩视频| 欧美日韩精品中文字幕| 欧美成人一区二区在线| 国产日韩亚洲| 亚洲一区二区三区在线看| 亚洲理论电影网| 久久综合色8888| 久久久久久自在自线| 国产精品美女在线| 亚洲视频导航| 亚洲一区二区视频在线| 欧美精品亚洲二区| 亚洲国产天堂久久国产91| 在线播放日韩| 久久精品国内一区二区三区| 久久久www成人免费毛片麻豆| 国产精品久久久久久久久久免费看 | 亚洲女人天堂成人av在线| 欧美极品色图| 亚洲欧洲精品一区二区三区不卡 | 欧美h视频在线| 欧美不卡高清| 亚洲精品久久久久久下一站| 欧美成人免费在线观看| 亚洲第一精品久久忘忧草社区| 永久免费精品影视网站| 久久免费99精品久久久久久| 欧美成年人在线观看| 亚洲第一主播视频| 欧美大片第1页| 亚洲看片免费| 西西人体一区二区| 国产一区二区成人久久免费影院| 欧美亚洲在线观看| 久久综合狠狠| 日韩亚洲在线| 国产精品爽黄69| 久久成人羞羞网站| 欧美高清你懂得| aa国产精品| 国产欧美日韩三级| 久久夜色精品| 亚洲毛片在线观看.| 欧美亚洲系列| 亚洲高清一区二| 欧美日韩理论| 欧美在线视频一区| 亚洲电影成人| 欧美一级二级三级蜜桃| 在线免费观看视频一区| 欧美激情综合五月色丁香小说| 99成人免费视频| 久久这里只有| 中日韩视频在线观看| 国产日韩欧美综合一区| 欧美黄污视频| 欧美亚洲一区二区三区| 亚洲第一色中文字幕| 欧美色大人视频| 欧美国产欧美综合 | 亚洲欧美激情视频在线观看一区二区三区| 国产精品久久午夜夜伦鲁鲁| 久久天天躁狠狠躁夜夜爽蜜月| 亚洲每日更新| 免费观看久久久4p| 亚欧成人精品| 一区二区不卡在线视频 午夜欧美不卡'| 国产精品久久久久9999高清| 久久综合精品一区| 亚洲中午字幕| 日韩一区二区精品| 欧美国产欧美亚洲国产日韩mv天天看完整 | 尤物九九久久国产精品的特点| 欧美三级乱码| 欧美不卡高清| 久久先锋影音| 性欧美8khd高清极品| 亚洲精品在线一区二区| 欧美激情一区二区三区在线视频观看| 亚欧美中日韩视频| 亚洲午夜激情免费视频| 亚洲精品一区二区三区福利| 伊人精品成人久久综合软件| 国产乱码精品一区二区三| 欧美日韩伊人| 欧美日韩一区二区三区在线看 | 日韩视频一区二区| 亚洲精品123区| 在线看国产一区| 国产自产女人91一区在线观看| 国产精品日韩专区| 国产精品进线69影院| 欧美精品一区二区高清在线观看| 久久综合精品一区| 久久综合给合久久狠狠狠97色69| 欧美在线3区| 久久精品国产亚洲aⅴ| 久久九九国产精品| 久久久国际精品| 久久精品综合网| 久久久免费精品| 欧美va日韩va| 欧美精品 日韩| 欧美午夜剧场| 国产日韩欧美精品综合| 国产亚洲欧美日韩日本| 一色屋精品视频在线看| 亚洲国产成人tv| 日韩视频欧美视频| 亚洲摸下面视频| 久久av最新网址| 麻豆精品在线播放| 亚洲电影自拍| 9色国产精品| 午夜欧美大尺度福利影院在线看| 欧美亚洲在线观看| 美女任你摸久久| 欧美午夜电影一区| 国产精品系列在线播放| 亚洲韩国青草视频| 亚洲第一区在线观看| 亚洲人在线视频| 在线亚洲精品| 亚洲一区二区三区中文字幕| 欧美伊人久久大香线蕉综合69| 久久视频这里只有精品| 欧美成人中文字幕| 国产精品国产成人国产三级| 国产一区二区福利| 亚洲免费观看高清完整版在线观看熊 | 欧美激情综合色| 亚洲一区二区三区久久| 久久久久久国产精品一区| 欧美黑人在线播放| 国产精品久久久久9999高清| 在线欧美一区| 亚洲欧美日韩精品久久奇米色影视| 久久免费偷拍视频| 99精品国产在热久久婷婷| 欧美影片第一页| 欧美日韩一区二区三区四区五区| 国产一区二区三区四区| 国产精品99久久久久久有的能看| 久久久亚洲影院你懂的| 99在线精品观看| 免费看的黄色欧美网站| 国产日韩欧美麻豆| 亚洲自拍偷拍福利| 91久久精品国产91久久性色| 欧美亚洲专区| 国产精品―色哟哟| 亚洲精品在线免费| 美女精品国产| 欧美中文在线视频| 国产欧美一区二区精品秋霞影院 | 一区二区精品在线| 欧美激情精品久久久久久| 午夜亚洲伦理| 国产精品入口尤物|