2021-07-03 05:07:57 +01:00
< ! DOCTYPE HTML >
< html >
< head >
< meta http - equiv = " Content-Type " content = " text/html;charset=US-ASCII " >
< meta name = " generator " content = " ZealOS V0.05 " >
< style type = " text/css " >
body { background - color : # 000000 ; }
. cF0 { color : # ffffff ; background - color : # 000000 ; }
. cF1 { color : # 3465 a4 ; background - color : # 000000 ; }
. cF2 { color : # 4e9 a06 ; background - color : # 000000 ; }
. cF3 { color : # 06 989 a ; background - color : # 000000 ; }
. cF4 { color : # a24444 ; background - color : # 000000 ; }
. cF5 { color : # 75507 b ; background - color : # 000000 ; }
. cF6 { color : # ce982f ; background - color : # 000000 ; }
. cF7 { color : # bcc0b9 ; background - color : # 000000 ; }
. cF8 { color : # 555753 ; background - color : # 000000 ; }
. cF9 { color : # 729f cf ; background - color : # 000000 ; }
. cFA { color : # 82 bc49 ; background - color : # 000000 ; }
. cFB { color : # 34e2 e2 ; background - color : # 000000 ; }
. cFC { color : # ac3535 ; background - color : # 000000 ; }
. cFD { color : # ad7fa8 ; background - color : # 000000 ; }
. cFE { color : # fce94f ; background - color : # 000000 ; }
. cFF { color : # 000000 ; background - color : # 000000 ; }
< / style >
< / head >
< body >
2021-07-05 01:12:38 +01:00
< pre style = " font-family:monospace;font-size:12pt " >
2021-07-03 05:07:57 +01:00
< a name = " l1 " > < / a > < span class = cF1 > Bool < / span > < span class = cF0 > < / span > < span class = cF5 > Option < / span > < span class = cF0 > ( < / span > < span class = cF9 > I64 < / span > < span class = cF0 > num , < / span > < span class = cF1 > Bool < / span > < span class = cF0 > val )
2021-07-03 07:51:43 +01:00
< a name = " l2 " > < / a > { < / span > < span class = cF2 > //Set compiler </span><a href="https://tomawezome.github.io/ZealOS/Doc/Options.html#l1"><span class=cF4>Option</span></a><span class=cF2> to val.</span><span class=cF0>
2021-07-04 23:11:34 +01:00
< a name = " l3 " > < / a > < / span > < span class = cF1 > return < / span > < span class = cF0 > < / span > < span class = cF5 > BEqual < / span > < span class = cF0 > ( & amp ; < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; last_cc - & gt ; opts , num , val ) ;
2021-07-03 05:07:57 +01:00
< a name = " l4 " > < / a > }
< a name = " l5 " > < / a >
< a name = " l6 " > < / a > < / span > < span class = cF1 > Bool < / span > < span class = cF0 > < / span > < span class = cF5 > OptionGet < / span > < span class = cF0 > ( < / span > < span class = cF9 > I64 < / span > < span class = cF0 > num )
2021-07-03 07:51:43 +01:00
< a name = " l7 " > < / a > { < / span > < span class = cF2 > //Get state of compiler </span><a href="https://tomawezome.github.io/ZealOS/Kernel/KernelA.html#l1675"><span class=cF4>option</span></a><span class=cF2>.</span><span class=cF0>
2021-07-04 23:11:34 +01:00
< a name = " l8 " > < / a > < / span > < span class = cF1 > return < / span > < span class = cF0 > < / span > < span class = cF5 > Bt < / span > < span class = cF0 > ( & amp ; < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; last_cc - & gt ; opts , num ) ;
2021-07-03 05:07:57 +01:00
< a name = " l9 " > < / a > }
< a name = " l10 " > < / a >
< a name = " l11 " > < / a > < / span > < span class = cF1 > asm < / span > < span class = cF0 > {
2021-07-04 23:11:34 +01:00
< a name = " l12 " > < / a > < / span > < span class = cFD > _LAST_FUN < / span > < span class = cF0 > : : < / span > < span class = cF2 > //See </span><a href="https://tomawezome.github.io/ZealOS/Kernel/KUtils.html#l415"><span class=cF4>_CALL_IND</span></a><span class=cF0>
< a name = " l13 " > < / a > < / span > < span class = cF1 > PUSH < / span > < span class = cF0 > < / span > < span class = cFC > RBP < / span > < span class = cF0 >
< a name = " l14 " > < / a > < / span > < span class = cF1 > MOV < / span > < span class = cF0 > < / span > < span class = cFC > RBP < / span > < span class = cF0 > , < / span > < span class = cFC > RSP < / span > < span class = cF0 >
< a name = " l15 " > < / a > < / span > < span class = cF1 > PUSH < / span > < span class = cF0 > < / span > < span class = cFC > RSI < / span > < span class = cF0 >
< a name = " l16 " > < / a > < / span > < span class = cF1 > PUSH < / span > < span class = cF0 > < / span > < span class = cFC > RDI < / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = " l17 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l18 " > < / a > < / span > < span class = cF1 > XOR < / span > < span class = cF0 > < / span > < span class = cFC > RAX < / span > < span class = cF0 > , < / span > < span class = cFC > RAX < / span > < span class = cF0 >
< a name = " l19 " > < / a > < / span > < span class = cF1 > MOV < / span > < span class = cF0 > < / span > < span class = cFC > RAX < / span > < span class = cF0 > , < / span > < span class = cFC > FS < / span > < span class = cF0 > : < / span > < span class = cF9 > CTask < / span > < span class = cF0 > . last_fun [ < / span > < span class = cFC > RAX < / span > < span class = cF0 > ]
< a name = " l20 " > < / a > < / span > < span class = cF1 > TEST < / span > < span class = cF0 > < / span > < span class = cFC > RAX < / span > < span class = cF0 > , < / span > < span class = cFC > RAX < / span > < span class = cF0 >
< a name = " l21 " > < / a > < / span > < span class = cF1 > JZ < / span > < span class = cF0 > @ @ 10
< a name = " l22 " > < / a > < / span > < span class = cF1 > MOV < / span > < span class = cF0 > < / span > < span class = cFC > RDX < / span > < span class = cF0 > , < / span > < span class = cF9 > U64 < / span > < span class = cF0 > < / span > < span class = cF9 > CHashFun < / span > < span class = cF0 > . exe_addr [ < / span > < span class = cFC > RAX < / span > < span class = cF0 > ]
2021-07-03 05:07:57 +01:00
< a name = " l23 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l24 " > < / a > < / span > < span class = cF1 > MOV < / span > < span class = cF0 > < / span > < span class = cFC > RCX < / span > < span class = cF0 > , < / span > < span class = cF9 > U64 < / span > < span class = cF0 > < / span > < span class = cF3 > SF_ARG1 < / span > < span class = cF0 > [ < / span > < span class = cFC > RBP < / span > < span class = cF0 > ] < / span > < span class = cF2 > // argc</span><span class=cF0>
< a name = " l25 " > < / a > < / span > < span class = cF1 > MOV < / span > < span class = cF0 > < / span > < span class = cFC > RSI < / span > < span class = cF0 > , < / span > < span class = cF9 > U64 < / span > < span class = cF0 > < / span > < span class = cF3 > SF_ARG2 < / span > < span class = cF0 > [ < / span > < span class = cFC > RBP < / span > < span class = cF0 > ] < / span > < span class = cF2 > // argv</span><span class=cF0>
< a name = " l26 " > < / a > < / span > < span class = cF1 > SHL < / span > < span class = cF0 > < / span > < span class = cFC > RCX < / span > < span class = cF0 > , < / span > < span class = cFE > 3 < / span > < span class = cF0 >
< a name = " l27 " > < / a > < / span > < span class = cF1 > SUB < / span > < span class = cF0 > < / span > < span class = cFC > RSP < / span > < span class = cF0 > , < / span > < span class = cFC > RCX < / span > < span class = cF0 >
< a name = " l28 " > < / a > < / span > < span class = cF1 > MOV < / span > < span class = cF0 > < / span > < span class = cFC > RDI < / span > < span class = cF0 > , < / span > < span class = cFC > RSP < / span > < span class = cF0 >
< a name = " l29 " > < / a > < / span > < span class = cF1 > REP_MOVSB < / span > < span class = cF0 >
< a name = " l30 " > < / a > < / span > < span class = cF1 > TEST < / span > < span class = cF0 > < / span > < span class = cFC > RDX < / span > < span class = cF0 > , < / span > < span class = cFC > RDX < / span > < span class = cF0 >
< a name = " l31 " > < / a > < / span > < span class = cF1 > JZ < / span > < span class = cF0 > @ @ 05
2021-07-03 05:07:57 +01:00
< a name = " l32 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l33 " > < / a > < / span > < span class = cF1 > CALL < / span > < span class = cF0 > < / span > < span class = cFC > RDX < / span > < span class = cF0 >
< a name = " l34 " > < / a > < / span > < span class = cF1 > POP < / span > < span class = cF0 > < / span > < span class = cFC > RDI < / span > < span class = cF0 >
< a name = " l35 " > < / a > < / span > < span class = cF1 > POP < / span > < span class = cF0 > < / span > < span class = cFC > RSI < / span > < span class = cF0 >
< a name = " l36 " > < / a > < / span > < span class = cF1 > POP < / span > < span class = cF0 > < / span > < span class = cFC > RBP < / span > < span class = cF0 >
< a name = " l37 " > < / a > < / span > < span class = cF1 > RET1 < / span > < span class = cF0 > < / span > < span class = cFE > 16 < / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = " l38 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l39 " > < / a > @ @ 05 : < / span > < span class = cF1 > MOV < / span > < span class = cF0 > < / span > < span class = cFC > RCX < / span > < span class = cF0 > , < / span > < span class = cF9 > U64 < / span > < span class = cF0 > < / span > < span class = cF3 > SF_ARG1 < / span > < span class = cF0 > [ < / span > < span class = cFC > RBP < / span > < span class = cF0 > ] < / span > < span class = cF2 > // argc</span><span class=cF0>
< a name = " l40 " > < / a > < / span > < span class = cF1 > SHL < / span > < span class = cF0 > < / span > < span class = cFC > RCX < / span > < span class = cF0 > , < / span > < span class = cFE > 3 < / span > < span class = cF0 >
< a name = " l41 " > < / a > < / span > < span class = cF1 > ADD < / span > < span class = cF0 > < / span > < span class = cFC > RSP < / span > < span class = cF0 > , < / span > < span class = cFC > RCX < / span > < span class = cF0 >
< a name = " l42 " > < / a > < / span > < span class = cF1 > XOR < / span > < span class = cF0 > < / span > < span class = cFC > RAX < / span > < span class = cF0 > , < / span > < span class = cFC > RAX < / span > < span class = cF0 >
< a name = " l43 " > < / a > @ @ 10 : < / span > < span class = cF1 > POP < / span > < span class = cF0 > < / span > < span class = cFC > RDI < / span > < span class = cF0 >
< a name = " l44 " > < / a > < / span > < span class = cF1 > POP < / span > < span class = cF0 > < / span > < span class = cFC > RSI < / span > < span class = cF0 >
< a name = " l45 " > < / a > < / span > < span class = cF1 > POP < / span > < span class = cF0 > < / span > < span class = cFC > RBP < / span > < span class = cF0 >
< a name = " l46 " > < / a > < / span > < span class = cF1 > RET1 < / span > < span class = cF0 > < / span > < span class = cFE > 16 < / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = " l47 " > < / a > }
< a name = " l48 " > < / a > < / span > < span class = cF1 > _extern < / span > < span class = cF0 > < / span > < span class = cFD > _LAST_FUN < / span > < span class = cF0 > < / span > < span class = cF9 > I64 < / span > < span class = cF0 > < / span > < span class = cF5 > LastFun < / span > < span class = cF0 > ( < / span > < span class = cF9 > I64 < / span > < span class = cF0 > argc , < / span > < span class = cF9 > I64 < / span > < span class = cF0 > * argv ) ; < / span > < span class = cF2 > //Execute last fun with args.</span><span class=cF0>
< a name = " l49 " > < / a >
< a name = " l50 " > < / a > < / span > < span class = cF9 > I64 < / span > < span class = cF0 > < / span > < span class = cF5 > PassTrace < / span > < span class = cF0 > ( < / span > < span class = cF9 > I64 < / span > < span class = cF0 > i = < / span > < span class = cFE > 0 b10001111101 < / span > < span class = cF0 > )
< a name = " l51 " > < / a > { < / span > < span class = cF2 > //Ctrls which optimizer passes are displayed.</span><span class=cF0>
2021-07-04 23:11:34 +01:00
< a name = " l52 " > < / a > < / span > < span class = cF9 > I64 < / span > < span class = cF0 > old = < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; last_cc - & gt ; pass_trace ;
2021-07-03 05:07:57 +01:00
< a name = " l53 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l54 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( i )
< a name = " l55 " > < / a > < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; last_cc - & gt ; saved_pass_trace = i ;
< a name = " l56 " > < / a > < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; last_cc - & gt ; pass_trace = i ;
2021-07-03 05:07:57 +01:00
< a name = " l57 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l58 " > < / a > < / span > < span class = cF1 > return < / span > < span class = cF0 > old ;
2021-07-03 05:07:57 +01:00
< a name = " l59 " > < / a > }
< a name = " l60 " > < / a >
< a name = " l61 " > < / a > < / span > < span class = cF1 > Bool < / span > < span class = cF0 > < / span > < span class = cF5 > Trace < / span > < span class = cF0 > ( < / span > < span class = cF1 > Bool < / span > < span class = cF0 > val = < / span > < span class = cF3 > ON < / span > < span class = cF0 > )
< a name = " l62 " > < / a > { < / span > < span class = cF2 > //Displays assembly code output from compiler.</span><span class=cF0>
2021-07-04 23:11:34 +01:00
< a name = " l63 " > < / a > < / span > < span class = cF1 > return < / span > < span class = cF0 > < / span > < span class = cF5 > Option < / span > < span class = cF0 > ( < / span > < span class = cF3 > OPTf_TRACE < / span > < span class = cF0 > , val ) ;
2021-07-03 05:07:57 +01:00
< a name = " l64 " > < / a > }
< a name = " l65 " > < / a >
< a name = " l66 " > < / a > < / span > < span class = cF1 > Bool < / span > < span class = cF0 > < / span > < span class = cF5 > Echo < / span > < span class = cF0 > ( < / span > < span class = cF1 > Bool < / span > < span class = cF0 > val )
< a name = " l67 " > < / a > { < / span > < span class = cF2 > //Displays text as it is being compiled.</span><span class=cF0>
2021-07-04 23:11:34 +01:00
< a name = " l68 " > < / a > < / span > < span class = cF1 > return < / span > < span class = cF0 > < / span > < span class = cF5 > Option < / span > < span class = cF0 > ( < / span > < span class = cF3 > OPTf_ECHO < / span > < span class = cF0 > , val ) ;
2021-07-03 05:07:57 +01:00
< a name = " l69 " > < / a > }
< a name = " l70 " > < / a >
< a name = " l71 " > < / a > < / span > < span class = cF1 > U0 < / span > < span class = cF0 > < / span > < span class = cF5 > StreamPrint < / span > < span class = cF0 > ( < / span > < span class = cF1 > U8 < / span > < span class = cF0 > * format , . . . )
< a name = " l72 " > < / a > { < / span > < span class = cF2 > //Injects text into the compile stream. Used in #exe{} blocks.</span><span class=cF0>
2021-07-04 23:11:34 +01:00
< a name = " l73 " > < / a > < / span > < span class = cF1 > U8 < / span > < span class = cF0 > * buf = < / span > < span class = cF5 > StrPrintJoin < / span > < span class = cF0 > ( < / span > < span class = cF3 > NULL < / span > < span class = cF0 > , format , argc , argv ) , * st ;
< a name = " l74 " > < / a > < / span > < span class = cF9 > CCompCtrl < / span > < span class = cF0 > * cc = < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; last_cc ;
< a name = " l75 " > < / a > < / span > < span class = cF9 > CStreamBlk < / span > < span class = cF0 > * tmpe = cc - & gt ; last_stream_blk ;
2021-07-03 05:07:57 +01:00
< a name = " l76 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l77 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( tmpe ! = & amp ; cc - & gt ; next_stream_blk )
< a name = " l78 " > < / a > < / span > < span class = cF7 > { < / span > < span class = cF0 >
< a name = " l79 " > < / a > st = < / span > < span class = cF5 > MStrPrint < / span > < span class = cF0 > ( < / span > < span class = cF6 > & quot ; % s % s & quot ; < / span > < span class = cF0 > , tmpe - & gt ; body , buf ) ;
< a name = " l80 " > < / a > < / span > < span class = cF5 > Free < / span > < span class = cF0 > ( tmpe - & gt ; body ) ;
< a name = " l81 " > < / a > tmpe - & gt ; body = st ;
< a name = " l82 " > < / a > < / span > < span class = cF7 > } < / span > < span class = cF0 >
< a name = " l83 " > < / a > < / span > < span class = cF1 > else < / span > < span class = cF0 >
< a name = " l84 " > < / a > < / span > < span class = cF5 > PrintErr < / span > < span class = cF0 > ( < / span > < span class = cF6 > & quot ; No exe { } blk \ n & quot ; < / span > < span class = cF0 > ) ;
< a name = " l85 " > < / a > < / span > < span class = cF5 > Free < / span > < span class = cF0 > ( buf ) ;
2021-07-03 05:07:57 +01:00
< a name = " l86 " > < / a > }
< a name = " l87 " > < / a >
< a name = " l88 " > < / a > < / span > < span class = cF1 > U0 < / span > < span class = cF0 > < / span > < span class = cF5 > StreamDir < / span > < span class = cF0 > ( )
< a name = " l89 " > < / a > {
2021-07-04 23:11:34 +01:00
< a name = " l90 " > < / a > < / span > < span class = cF1 > U8 < / span > < span class = cF0 > * dirname ;
2021-07-03 05:07:57 +01:00
< a name = " l91 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l92 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( dirname = < / span > < span class = cF5 > DirFile < / span > < span class = cF7 > ( < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; last_cc - & gt ; lex_include_stack - & gt ; full_name < / span > < span class = cF7 > ) < / span > < span class = cF0 > )
< a name = " l93 " > < / a > < / span > < span class = cF7 > { < / span > < span class = cF0 >
< a name = " l94 " > < / a > < / span > < span class = cF5 > StreamPrint < / span > < span class = cF0 > ( < / span > < span class = cF6 > & quot ; \ & quot ; % s \ & quot ; & quot ; < / span > < span class = cF0 > , dirname ) ;
< a name = " l95 " > < / a > < / span > < span class = cF5 > Free < / span > < span class = cF0 > ( dirname ) ;
< a name = " l96 " > < / a > < / span > < span class = cF7 > } < / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = " l97 " > < / a > }
< a name = " l98 " > < / a >
< a name = " l99 " > < / a > < / span > < span class = cF9 > CD2I32 < / span > < span class = cF0 > * < / span > < span class = cF5 > LexD2I32 < / span > < span class = cF0 > ( < / span > < span class = cF9 > CCompCtrl < / span > < span class = cF0 > * cc , < / span > < span class = cF9 > CD2I32 < / span > < span class = cF0 > * p )
< a name = " l100 " > < / a > { < / span > < span class = cF2 > //Not CosmiC. Sprite-like lex 2D point.</span><span class=cF0>
2021-07-04 23:11:34 +01:00
< a name = " l101 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( cc - & gt ; token ! = < / span > < span class = cF6 > ' ( ' < / span > < span class = cF0 > )
< a name = " l102 " > < / a > < / span > < span class = cF5 > LexExcept < / span > < span class = cF0 > ( cc , < / span > < span class = cF6 > & quot ; Expecting ' ( ' at & quot ; < / span > < span class = cF0 > ) ;
< a name = " l103 " > < / a > < / span > < span class = cF5 > Lex < / span > < span class = cF0 > ( cc ) ; < / span > < span class = cF2 > // Skip (</span><span class=cF0>
< a name = " l104 " > < / a > p - & gt ; x = < / span > < span class = cF5 > LexExpressionI64 < / span > < span class = cF0 > ( cc ) ;
< a name = " l105 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( cc - & gt ; token ! = < / span > < span class = cF6 > ' , ' < / span > < span class = cF0 > )
< a name = " l106 " > < / a > < / span > < span class = cF5 > LexExcept < / span > < span class = cF0 > ( cc , < / span > < span class = cF6 > & quot ; Expecting ' , ' at & quot ; < / span > < span class = cF0 > ) ;
< a name = " l107 " > < / a > < / span > < span class = cF5 > Lex < / span > < span class = cF0 > ( cc ) ; < / span > < span class = cF2 > // Skip ,</span><span class=cF0>
< a name = " l108 " > < / a > p - & gt ; y = < / span > < span class = cF5 > LexExpressionI64 < / span > < span class = cF0 > ( cc ) ;
< a name = " l109 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( cc - & gt ; token ! = < / span > < span class = cF6 > ' ) ' < / span > < span class = cF0 > )
< a name = " l110 " > < / a > < / span > < span class = cF5 > LexExcept < / span > < span class = cF0 > ( cc , < / span > < span class = cF6 > & quot ; Expecting ' ) ' at & quot ; < / span > < span class = cF0 > ) ;
< a name = " l111 " > < / a > < / span > < span class = cF5 > Lex < / span > < span class = cF0 > ( cc ) ; < / span > < span class = cF2 > // Skip )</span><span class=cF0>
2021-07-03 05:07:57 +01:00
< a name = " l112 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l113 " > < / a > < / span > < span class = cF1 > return < / span > < span class = cF0 > p ;
2021-07-03 05:07:57 +01:00
< a name = " l114 " > < / a > }
< a name = " l115 " > < / a >
< a name = " l116 " > < / a > < / span > < span class = cF9 > CD3I32 < / span > < span class = cF0 > * < / span > < span class = cF5 > LexD3I32 < / span > < span class = cF0 > ( < / span > < span class = cF9 > CCompCtrl < / span > < span class = cF0 > * cc , < / span > < span class = cF9 > CD3I32 < / span > < span class = cF0 > * p )
< a name = " l117 " > < / a > { < / span > < span class = cF2 > //Not CosmiC. Sprite-like lex 3D point.</span><span class=cF0>
2021-07-04 23:11:34 +01:00
< a name = " l118 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( cc - & gt ; token ! = < / span > < span class = cF6 > ' ( ' < / span > < span class = cF0 > )
< a name = " l119 " > < / a > < / span > < span class = cF5 > LexExcept < / span > < span class = cF0 > ( cc , < / span > < span class = cF6 > & quot ; Expecting ' ( ' at & quot ; < / span > < span class = cF0 > ) ;
< a name = " l120 " > < / a > < / span > < span class = cF5 > Lex < / span > < span class = cF0 > ( cc ) ; < / span > < span class = cF2 > // Skip (</span><span class=cF0>
< a name = " l121 " > < / a > p - & gt ; x = < / span > < span class = cF5 > LexExpressionI64 < / span > < span class = cF0 > ( cc ) ;
< a name = " l122 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( cc - & gt ; token ! = < / span > < span class = cF6 > ' , ' < / span > < span class = cF0 > )
< a name = " l123 " > < / a > < / span > < span class = cF5 > LexExcept < / span > < span class = cF0 > ( cc , < / span > < span class = cF6 > & quot ; Expecting ' , ' at & quot ; < / span > < span class = cF0 > ) ;
< a name = " l124 " > < / a > < / span > < span class = cF5 > Lex < / span > < span class = cF0 > ( cc ) ; < / span > < span class = cF2 > // Skip ,</span><span class=cF0>
< a name = " l125 " > < / a > p - & gt ; y = < / span > < span class = cF5 > LexExpressionI64 < / span > < span class = cF0 > ( cc ) ;
< a name = " l126 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( cc - & gt ; token ! = < / span > < span class = cF6 > ' , ' < / span > < span class = cF0 > )
< a name = " l127 " > < / a > < / span > < span class = cF5 > LexExcept < / span > < span class = cF0 > ( cc , < / span > < span class = cF6 > & quot ; Expecting ' , ' at & quot ; < / span > < span class = cF0 > ) ;
< a name = " l128 " > < / a > < / span > < span class = cF5 > Lex < / span > < span class = cF0 > ( cc ) ; < / span > < span class = cF2 > // Skip ,</span><span class=cF0>
< a name = " l129 " > < / a > p - & gt ; z = < / span > < span class = cF5 > LexExpressionI64 < / span > < span class = cF0 > ( cc ) ;
< a name = " l130 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( cc - & gt ; token ! = < / span > < span class = cF6 > ' ) ' < / span > < span class = cF0 > )
< a name = " l131 " > < / a > < / span > < span class = cF5 > LexExcept < / span > < span class = cF0 > ( cc , < / span > < span class = cF6 > & quot ; Expecting ' ) ' at & quot ; < / span > < span class = cF0 > ) ;
< a name = " l132 " > < / a > < / span > < span class = cF5 > Lex < / span > < span class = cF0 > ( cc ) ; < / span > < span class = cF2 > // Skip )</span><span class=cF0>
2021-07-03 05:07:57 +01:00
< a name = " l133 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l134 " > < / a > < / span > < span class = cF1 > return < / span > < span class = cF0 > p ;
2021-07-03 05:07:57 +01:00
< a name = " l135 " > < / a > }
< a name = " l136 " > < / a >
< a name = " l137 " > < / a > < / span > < span class = cF1 > U8 < / span > < span class = cF0 > * < / span > < span class = cFD > CmdLinePrompt < / span > < span class = cF0 > ( )
< a name = " l138 " > < / a > {
2021-07-04 23:11:34 +01:00
< a name = " l139 " > < / a > < / span > < span class = cF9 > I64 < / span > < span class = cF0 > i ;
< a name = " l140 " > < / a > < / span > < span class = cF1 > U8 < / span > < span class = cF0 > * res , * st ;
2021-07-03 05:07:57 +01:00
< a name = " l141 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l142 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; new_answer )
< a name = " l143 " > < / a > < / span > < span class = cF7 > { < / span > < span class = cF0 >
< a name = " l144 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; answer_type & amp ; ~ < / span > < span class = cFE > 1 < / span > < span class = cF0 > ! = < / span > < span class = cF3 > RT_I0 < / span > < span class = cF0 > )
< a name = " l145 " > < / a > {
< a name = " l146 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; answer_type = = < / span > < span class = cF3 > RT_F64 < / span > < span class = cF0 > )
< a name = " l147 " > < / a > < / span > < span class = cF6 > & quot ; % 8.6f s ansf = % 15.7 g \ n & quot ; < / span > < span class = cF0 > , < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; answer_time , < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; answer ;
< a name = " l148 " > < / a > < / span > < span class = cF1 > else < / span > < span class = cF0 >
< a name = " l149 " > < / a > < / span > < span class = cF6 > & quot ; % 8.6f s ans = 0 x % 08 X = % d \ n & quot ; < / span > < span class = cF0 > , < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; answer_time , < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; answer , < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; answer ;
< a name = " l150 " > < / a > }
< a name = " l151 " > < / a > < / span > < span class = cF1 > else < / span > < span class = cF0 >
< a name = " l152 " > < / a > {
< a name = " l153 " > < / a > < / span > < span class = cF6 > & quot ; % 8.6f s \ n & quot ; < / span > < span class = cF0 > , < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; answer_time ;
< a name = " l154 " > < / a > < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; answer = < / span > < span class = cFE > 0 < / span > < span class = cF0 > ;
< a name = " l155 " > < / a > }
< a name = " l156 " > < / a > < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; new_answer = < / span > < span class = cF3 > FALSE < / span > < span class = cF0 > ;
< a name = " l157 " > < / a > < / span > < span class = cF7 > } < / span > < span class = cF0 >
< a name = " l158 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( st = < / span > < span class = cF5 > DirCur < / span > < span class = cF0 > )
< a name = " l159 " > < / a > < / span > < span class = cF7 > { < / span > < span class = cF0 >
< a name = " l160 " > < / a > < / span > < span class = cF6 > & quot ; % s & quot ; < / span > < span class = cF0 > , st ;
< a name = " l161 " > < / a > < / span > < span class = cF5 > Free < / span > < span class = cF0 > ( st ) ;
< a name = " l162 " > < / a > < / span > < span class = cF7 > } < / span > < span class = cF0 >
< a name = " l163 " > < / a > < / span > < span class = cF6 > ' & gt ; ' < / span > < span class = cF0 > ;
< a name = " l164 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( < / span > < span class = cF5 > IsDebugMode < / span > < span class = cF0 > & amp ; & amp ; < / span > < span class = cF5 > IsRaw < / span > < span class = cF0 > )
< a name = " l165 " > < / a > < / span > < span class = cF5 > RawDr < / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = " l166 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l167 " > < / a > < / span > < span class = cF5 > LBts < / span > < span class = cF0 > ( & amp ; < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; task_flags , < / span > < span class = cF3 > TASKf_CMD_LINE_PROMPT < / span > < span class = cF0 > ) ;
< a name = " l168 " > < / a > st = < / span > < span class = cF5 > StrGet < / span > < span class = cF0 > ( , , < / span > < span class = cF3 > SGF_SHIFT_ESC_EXIT < / span > < span class = cF0 > ) ;
< a name = " l169 " > < / a > < / span > < span class = cF5 > LBtr < / span > < span class = cF0 > ( & amp ; < / span > < span class = cF5 > Fs < / span > < span class = cF0 > - & gt ; task_flags , < / span > < span class = cF3 > TASKf_CMD_LINE_PROMPT < / span > < span class = cF0 > ) ;
2021-07-03 05:07:57 +01:00
< a name = " l170 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l171 " > < / a > i = < / span > < span class = cF5 > StrLen < / span > < span class = cF0 > ( st ) ;
< a name = " l172 " > < / a > res = < / span > < span class = cF5 > MAlloc < / span > < span class = cF0 > ( i + < / span > < span class = cFE > 1 < / span > < span class = cF0 > + < / span > < span class = cFE > 2 < / span > < span class = cF0 > ) ;
< a name = " l173 " > < / a > < / span > < span class = cF5 > MemCopy < / span > < span class = cF0 > ( res , st , i + < / span > < span class = cFE > 1 < / span > < span class = cF0 > ) ;
< a name = " l174 " > < / a > i - - ;
< a name = " l175 " > < / a > < / span > < span class = cF1 > while < / span > < span class = cF0 > ( i & gt ; = < / span > < span class = cFE > 0 < / span > < span class = cF0 > & amp ; & amp ; < / span > < span class = cF5 > Bt < / span > < span class = cF7 > ( < / span > < span class = cFB > char_bmp_white_space < / span > < span class = cF0 > , res [ i ] < / span > < span class = cF7 > ) < / span > < span class = cF0 > )
< a name = " l176 " > < / a > i - - ;
< a name = " l177 " > < / a > i + + ;
< a name = " l178 " > < / a > < / span > < span class = cF1 > if < / span > < span class = cF0 > ( i & gt ; < / span > < span class = cFE > 0 < / span > < span class = cF0 > & amp ; & amp ; res [ i - < / span > < span class = cFE > 1 < / span > < span class = cF0 > ] = = < / span > < span class = cF6 > ' ; ' < / span > < span class = cF0 > )
< a name = " l179 " > < / a > res [ i + + ] = < / span > < span class = cF6 > ' ; ' < / span > < span class = cF0 > ; < / span > < span class = cF2 > // The Lex goes one beyond</span><span class=cF0>
< a name = " l180 " > < / a > res [ i + + ] = < / span > < span class = cF6 > ' \n ' < / span > < span class = cF0 > ; < / span > < span class = cF2 > // #define goes to '\n'</span><span class=cF0>
< a name = " l181 " > < / a > res [ i ] = < / span > < span class = cFE > 0 < / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = " l182 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l183 " > < / a > < / span > < span class = cF5 > Free < / span > < span class = cF0 > ( st ) ;
2021-07-03 05:07:57 +01:00
< a name = " l184 " > < / a >
2021-07-04 23:11:34 +01:00
< a name = " l185 " > < / a > < / span > < span class = cF1 > return < / span > < span class = cF0 > res ;
2021-07-03 05:07:57 +01:00
< a name = " l186 " > < / a > }
< / span > < / pre > < / body >
< / html >
