joe9added tests9661fb65 years agoHistory
58534 lines · 1.4 MB · Text
RawDownload
declare module Sysdeclare module Drawdeclare module Bufiodeclare module BufioFilldeclare module ChanFilldeclare module Stringdeclare module Filepatdeclare module Envdeclare module Commanddeclare module Shdeclare module Shellbuiltindeclare module YYSysvariable 'SELF' val '"$self"'variable 'Sys->PATH' val '"$Sys"'variable 'Sys->Maxint' val '2147483647'variable 'Sys->QTDIR' val '128'variable 'Sys->QTAPPEND' val '64'variable 'Sys->QTEXCL' val '32'variable 'Sys->QTAUTH' val '8'variable 'Sys->QTTMP' val '4'variable 'Sys->QTFILE' val '0'variable 'Sys->nulldir' val 'Dir(nil, nil, nil, nil, (-1, -1, -1), -1, -1, -1, -1, -1, -1)'variable 'Sys->zerodir' val 'Dir(nil, nil, nil, nil, (0, 0, 0), 0, 0, 0, 0, 0, 0)'variable 'Sys->ATOMICIO' val '8192'variable 'Sys->SEEKSTART' val '0'variable 'Sys->SEEKRELA' val '1'variable 'Sys->SEEKEND' val '2'variable 'Sys->NAMEMAX' val '256'variable 'Sys->ERRMAX' val '128'variable 'Sys->WAITLEN' val '192'variable 'Sys->OREAD' val '0'variable 'Sys->OWRITE' val '1'variable 'Sys->ORDWR' val '2'variable 'Sys->OTRUNC' val '16'variable 'Sys->ORCLOSE' val '64'variable 'Sys->OEXCL' val '4096'variable 'Sys->DMDIR' val '-2147483648'variable 'Sys->DMAPPEND' val '1073741824'variable 'Sys->DMEXCL' val '536870912'variable 'Sys->DMAUTH' val '134217728'variable 'Sys->DMTMP' val '67108864'variable 'Sys->MREPL' val '0'variable 'Sys->MBEFORE' val '1'variable 'Sys->MAFTER' val '2'variable 'Sys->MCREATE' val '4'variable 'Sys->MCACHE' val '16'variable 'Sys->NEWFD' val '(1)'variable 'Sys->FORKFD' val '(2)'variable 'Sys->NEWNS' val '(4)'variable 'Sys->FORKNS' val '(8)'variable 'Sys->NEWPGRP' val '(16)'variable 'Sys->NODEVS' val '(32)'variable 'Sys->NEWENV' val '(64)'variable 'Sys->FORKENV' val '(128)'variable 'Sys->EXPWAIT' val '0'variable 'Sys->EXPASYNC' val '1'variable 'Sys->UTFmax' val '4'variable 'Sys->UTFerror' val '65533'variable 'Sys->Runemax' val '1114111'variable 'Sys->Runemask' val '2097151'variable 'Draw->PATH' val '"$Draw"'variable 'Draw->Opaque' val '-1'variable 'Draw->Transparent' val '0'variable 'Draw->Black' val '255'variable 'Draw->White' val '-1'variable 'Draw->Red' val '-16776961'variable 'Draw->Green' val '16711935'variable 'Draw->Blue' val '65535'variable 'Draw->Cyan' val '16777215'variable 'Draw->Magenta' val '-16711681'variable 'Draw->Yellow' val '-65281'variable 'Draw->Grey' val '-286331137'variable 'Draw->Paleyellow' val '-21761'variable 'Draw->Darkyellow' val '-286351617'variable 'Draw->Darkgreen' val '1149781247'variable 'Draw->Palegreen' val '-1426085121'variable 'Draw->Medgreen' val '-1999861505'variable 'Draw->Darkblue' val '22015'variable 'Draw->Palebluegreen' val '-1426063361'variable 'Draw->Paleblue' val '48127'variable 'Draw->Bluegreen' val '8947967'variable 'Draw->Greygreen' val '1437248255'variable 'Draw->Palegreygreen' val '-1628508417'variable 'Draw->Yellowgreen' val '-1718006529'variable 'Draw->Medblue' val '39423'variable 'Draw->Greyblue' val '6142975'variable 'Draw->Palegreyblue' val '1234427391'variable 'Draw->Purpleblue' val '-2004300545'variable 'Draw->Notacolor' val '-256'variable 'Draw->Nofill' val 'Notacolor'variable 'Draw->Endsquare' val '0'variable 'Draw->Enddisc' val '1'variable 'Draw->Endarrow' val '2'variable 'Draw->Flushoff' val '0'variable 'Draw->Flushon' val '1'variable 'Draw->Flushnow' val '2'variable 'Draw->Refbackup' val '0'variable 'Draw->Refnone' val '1'variable 'Draw->SinD' val '8'variable 'Draw->DinS' val '4'variable 'Draw->SoutD' val '2'variable 'Draw->DoutS' val '1'variable 'Draw->S' val '10'variable 'Draw->SoverD' val '11'variable 'Draw->SatopD' val '9'variable 'Draw->SxorD' val '3'variable 'Draw->D' val '5'variable 'Draw->DoverS' val '7'variable 'Draw->DatopS' val '6'variable 'Draw->DxorS' val '3'variable 'Draw->Clear' val '0'variable 'Draw->CRed' val 'iota'variable 'Draw->CGreen' val 'iota'variable 'Draw->CBlue' val 'iota'variable 'Draw->CGrey' val 'iota'variable 'Draw->CAlpha' val 'iota'variable 'Draw->CMap' val 'iota'variable 'Draw->CIgnore' val 'iota'variable 'Draw->GREY1' val 'Chans(49)'variable 'Draw->GREY2' val 'Chans(50)'variable 'Draw->GREY4' val 'Chans(52)'variable 'Draw->GREY8' val 'Chans(56)'variable 'Draw->CMAP8' val 'Chans(88)'variable 'Draw->RGB15' val 'Chans(1627723045)'variable 'Draw->RGB16' val 'Chans(333349)'variable 'Draw->RGB24' val 'Chans(530472)'variable 'Draw->RGBA32' val 'Chans(402663496)'variable 'Draw->ARGB32' val 'Chans(1208490024)'variable 'Draw->XRGB32' val 'Chans(1745360936)'variable 'Bufio->PATH' val '"/dis/lib/b..."'variable 'Bufio->SEEKSTART' val 'SEEKSTART'variable 'Bufio->SEEKRELA' val 'SEEKRELA'variable 'Bufio->SEEKEND' val 'SEEKEND'variable 'Bufio->OREAD' val 'OREAD'variable 'Bufio->OWRITE' val 'OWRITE'variable 'Bufio->ORDWR' val 'ORDWR'variable 'Bufio->EOF' val '-1'variable 'Bufio->ERROR' val '-2'variable 'ChanFill->PATH' val '"/dis/lib/c..."'variable 'String->PATH' val '"/dis/lib/s..."'variable 'Filepat->PATH' val '"/dis/lib/f..."'variable 'Env->PATH' val '"/dis/lib/e..."'variable 'Command->PATH' val '"/dis/sh.di..."'variable 'PATH' val '"/dis/sh.di..."'variable 'Context.INTERACTIVE' val '1'variable 'Context.VERBOSE' val '2'variable 'Context.EXECPRINT' val '4'variable 'Context.ERROREXIT' val '8'variable 'Var.CHANGED' val '(1)'variable 'Var.NOEXPORT' val '(2)'variable 'n_BLOCK' val 'iota'variable 'n_VAR' val 'iota'variable 'n_BQ' val 'iota'variable 'n_BQ2' val 'iota'variable 'n_REDIR' val 'iota'variable 'n_DUP' val 'iota'variable 'n_LIST' val 'iota'variable 'n_SEQ' val 'iota'variable 'n_CONCAT' val 'iota'variable 'n_PIPE' val 'iota'variable 'n_ADJ' val 'iota'variable 'n_WORD' val 'iota'variable 'n_NOWAIT' val 'iota'variable 'n_SQUASH' val 'iota'variable 'n_COUNT' val 'iota'variable 'n_ASSIGN' val 'iota'variable 'n_LOCAL' val 'iota'variable 'GLOB' val '1'variable 'Shellbuiltin->BUILTIN' val 'iota'variable 'Shellbuiltin->SBUILTIN' val 'iota'variable 'Shellbuiltin->OTHER' val 'iota'variable 'YYLEX.EOF' val '-1'variable 'DUP' val '57346'variable 'REDIR' val '57347'variable 'WORD' val '57348'variable 'OP' val '57349'variable 'END' val '57350'variable 'ERROR' val '57351'variable 'ANDAND' val '57352'variable 'OROR' val '57353'variable 'YYEOFCODE' val '1'variable 'YYERRCODE' val '2'variable 'YYMAXDEPTH' val '200'variable 'EPERM' val '"permission..."'variable 'EPIPE' val '"write on c..."'variable 'LIBSHELLRC' val '"/lib/sh/pr..."'variable 'BUILTINPATH' val '"/dis/sh"'variable 'DEBUG' val '0'variable 'ENVSEP' val '0'variable 'ENVHASHSIZE' val '7'variable 'OAPPEND' val '524288'variable 'OMASK' val '7'variable 'NOTOKEN' val '-1'generate desc for intgenerate desc for int	desc	$-1,4,""variable 'YYNPROD' val '45'variable 'YYPRIVATE' val '57344'variable 'yydebug' val '0'variable 'YYLAST' val '93'generate desc for intgenerate desc for intgenerate desc for intgenerate desc for intgenerate desc for intgenerate desc for intgenerate desc for intgenerate desc for intgenerate desc for intgenerate desc for intvariable 'YYFLAG' val '-1000'typecheck tree: fn(){} fn() 0 0  name usage fn() 0 0  seq nothing 0 0    call nothing 0 0      -> nothing 0 0        name sys nothing 0 0        name fprint nothing 0 0      seq nothing 0 0        call nothing 0 0          name stderr nothing 0 0        seq nothing 0 0          const usage: sh [-ilexn] [-c command] [file [arg...]] string 0 0    seq nothing 0 0      raise nothing 0 0        const fail:usage string 0 0typecheck tree: fn(){} fn(path: string) 0 0  name badmodule fn(path: string) 0 0  seq nothing 0 0    call nothing 0 0      -> nothing 0 0        name sys nothing 0 0        name fprint nothing 0 0      seq nothing 0 0        call nothing 0 0          -> nothing 0 0            name sys nothing 0 0            name fildes nothing 0 0          seq nothing 0 0            const (2) int 0 0        seq nothing 0 0          const sh: cannot load %s: %r string 0 0          seq nothing 0 0            name path nothing 0 0    seq nothing 0 0      raise nothing 0 0        const fail:bad module string 0 0typecheck tree: fn(){} fn() 0 0  name initialise fn() 0 0  seq nothing 0 0    if nothing 0 0      == nothing 0 0        name sys nothing 0 0        name nil polymorphic type 0 0      seq nothing 0 0        scope nothing 0 0          seq nothing 0 0            = nothing 0 0              name sys nothing 0 0              load Sys 0 0                -> nothing 0 0                  name Sys nothing 0 0                  name PATH nothing 0 0            seq nothing 0 0              = nothing 0 0                name filepat nothing 0 0                load Filepat 0 0                  -> nothing 0 0                    name Filepat nothing 0 0                    name PATH nothing 0 0              seq nothing 0 0                if nothing 0 0                  == nothing 0 0                    name filepat nothing 0 0                    name nil polymorphic type 0 0                  seq nothing 0 0                    call nothing 0 0                      name badmodule nothing 0 0                      seq nothing 0 0                        -> nothing 0 0                          name Filepat nothing 0 0                          name PATH nothing 0 0                seq nothing 0 0                  = nothing 0 0                    name str nothing 0 0                    load String 0 0                      -> nothing 0 0                        name String nothing 0 0                        name PATH nothing 0 0                  seq nothing 0 0                    if nothing 0 0                      == nothing 0 0                        name str nothing 0 0                        name nil polymorphic type 0 0                      seq nothing 0 0                        call nothing 0 0                          name badmodule nothing 0 0                          seq nothing 0 0                            -> nothing 0 0                              name String nothing 0 0                              name PATH nothing 0 0                    seq nothing 0 0                      = nothing 0 0                        name bufio nothing 0 0                        load Bufio 0 0                          -> nothing 0 0                            name Bufio nothing 0 0                            name PATH nothing 0 0                      seq nothing 0 0                        if nothing 0 0                          == nothing 0 0                            name bufio nothing 0 0                            name nil polymorphic type 0 0                          seq nothing 0 0                            call nothing 0 0                              name badmodule nothing 0 0                              seq nothing 0 0                                -> nothing 0 0                                  name Bufio nothing 0 0                                  name PATH nothing 0 0                        seq nothing 0 0                          = nothing 0 0                            name myself nothing 0 0                            load Sh 0 0                              const $self string 0 0                          seq nothing 0 0                            if nothing 0 0                              == nothing 0 0                                name myself nothing 0 0                                name nil polymorphic type 0 0                              seq nothing 0 0                                call nothing 0 0                                  name badmodule nothing 0 0                                  seq nothing 0 0                                    const $self(Sh) string 0 0                            seq nothing 0 0                              = nothing 0 0                                name myselfbuiltin nothing 0 0                                load Shellbuiltin 0 0                                  const $self string 0 0                              seq nothing 0 0                                if nothing 0 0                                  == nothing 0 0                                    name myselfbuiltin nothing 0 0                             typecheck tree: fn(){} fn(drawcontext: ref Draw->Context, argv: list of string) 0 0  name init fn(ctxt: ref Draw->Context, argv: list of string) 0 0  seq nothing 0 0    call nothing 0 0      name initialise nothing 0 0    seq nothing 0 0      := nothing 0 0        name opts nothing 0 0        name blankopts nothing 0 0      seq nothing 0 0        if nothing 0 0          != nothing 0 0            name argv nothing 0 0            name nil polymorphic type 0 0          seq nothing 0 0            scope nothing 0 0              seq nothing 0 0                if nothing 0 0                  == nothing 0 0                    index nothing 0 0                      hd nothing 0 0                        name argv nothing 0 0                      const (0) int 0 0                    const (45) int 0 0                  seq nothing 0 0                    ++ nothing 0 0                      . nothing 0 0                        name opts nothing 0 0                        name lflag nothing 0 0                seq nothing 0 0                  = nothing 0 0                    name argv nothing 0 0                    tl nothing 0 0                      name argv nothing 0 0        seq nothing 0 0          := nothing 0 0            name interactive nothing 0 0            const (0) int 0 0          seq nothing 0 0            for nothing 0 0              && nothing 0 0                && nothing 0 0                  != nothing 0 0                    name argv nothing 0 0                    name nil polymorphic type 0 0                  != nothing 0 0                    hd nothing 0 0                      name argv nothing 0 0                    name nil polymorphic type 0 0                == nothing 0 0                  index nothing 0 0                    hd nothing 0 0                      name argv nothing 0 0                    const (0) int 0 0                  const (45) int 0 0              seq nothing 0 0                scope nothing 0 0                  seq nothing 0 0                    := nothing 0 0                      name i nothing 0 0                      const (1) int 0 0                    seq nothing 0 0                      for nothing 0 0                        < nothing 0 0                          name i nothing 0 0                          len nothing 0 0                            hd nothing 0 0                              name argv nothing 0 0                        seq nothing 0 0                          scope nothing 0 0                            seq nothing 0 0                              := nothing 0 0                                name c nothing 0 0                                index nothing 0 0                                  hd nothing 0 0                                    name argv nothing 0 0                                  name i nothing 0 0                              seq nothing 0 0                                case nothing 0 0                                  name c nothing 0 0                                  seq nothing 0 0                                    label nothing 0 0                                      seq nothing 0 0                                        const (105) int 0 0                                      scope nothing 0 0                                        = nothing 0 0                                          name interactive nothing 0 0                                          . nothing 0 0                                            name Context nothing 0 0                                            name INTERACTIVE nothing 0 0                                    seq nothing 0 0                                      label nothing 0 0                                        seq nothing 0 0                                          const (108) int 0 0                                        scope nothing 0 0                                          ++ nothing 0 0                                            . nothing 0 0                                              name opts nothing 0 0      typecheck tree: fn(){} fn(s: string): (ref Node, string) 0 0  name parse fn(s: string): (ref Node, string) 0 0  seq nothing 0 0    call nothing 0 0      name initialise nothing 0 0    seq nothing 0 0      := nothing 0 0        name lex nothing 0 0        call nothing 0 0          . nothing 0 0            name YYLEX nothing 0 0            name initstring nothing 0 0          seq nothing 0 0            name s nothing 0 0      seq nothing 0 0        return nothing 0 0          call nothing 0 0            name doparse nothing 0 0            seq nothing 0 0              name lex nothing 0 0              seq nothing 0 0                const  string 0 0                seq nothing 0 0                  const (0) int 0 0typecheck tree: fn(){} fn(drawctxt: ref Draw->Context, cmd: string): string 0 0  name system fn(drawctxt: ref Draw->Context, cmd: string): string 0 0  seq nothing 0 0    call nothing 0 0      name initialise nothing 0 0    seq nothing 0 0      exstat nothing 0 0        scope nothing 0 0          seq nothing 0 0            := nothing 0 0              tuple nothing 0 0                seq nothing 0 0                  name n nothing 0 0                  seq nothing 0 0                    name err nothing 0 0              call nothing 0 0                name parse nothing 0 0                seq nothing 0 0                  name cmd nothing 0 0            seq nothing 0 0              if nothing 0 0                != nothing 0 0                  name err nothing 0 0                  name nil polymorphic type 0 0

Lines 1–500 of 58534.