config.mk - suckless/dwm - Unnamed repository; edit this file 'description' to name the repository.

blob: b18ad3308073ab8a823834392a8033fbe7cfc91b (plain) (tree)

3af6434 ^

08c596e ^

3af6434 ^

1076f2b

1076f2b

1076f2b

14f7380 ^

2e95837 ^

1076f2b

7b5638f ^

ecc95c9 ^

b896b58 ^

generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2024-11-07 04:45:50 +0000

ss="o">-1) { lineNum = 'L'+lineNum; } lineElem = document.getElementById(lineNum); /* Always jump to new location even if the line was hidden inside a fold, or * we corrected the raw number to a line ID. */ if (lineElem) { lineElem.scrollIntoView(true); } return true; } if ('onhashchange' in window) { window.onhashchange = JumpToLine; } --> </script> </head> <body onload='JumpToLine();'> <a href='https://github.com/akkartik/mu/blob/master/084console.mu'>https://github.com/akkartik/mu/blob/master/084console.mu</a> <pre id='vimCodeElement'> 1 # Wrappers around interaction primitives that take a potentially fake object 2 # and are thus easier to test. 3 4 exclusive-container <a href='084console.mu.html#L4'>event</a> [ 5 text:char 6 keycode:num # keys on keyboard without a unicode representation 7 touch:<a href='084console.mu.html#L12'>touch-event</a> # mouse, track ball, etc. 8 resize:<a href='084console.mu.html#L18'>resize-event</a> 9 # update the assume-console handler if you add more variants 10 ] 11 12 container <a href='084console.mu.html#L12'>touch-event</a> [ 13 type:num 14 row:num 15 column:num 16 ] 17 18 container <a href='084console.mu.html#L18'>resize-event</a> [ 19 width:num 20 height:num 21 ] 22 23 container <a href='084console.mu.html#L23'>console</a> [ 24 current-event-index:num 25 events:&:@:<a href='084console.mu.html#L4'>event</a> 26 ] 27 28 def <a href='084console.mu.html#L28'>new-fake-console</a> events:&:@:<a href='084console.mu.html#L4'>event</a> -> result:&:<a href='084console.mu.html#L23'>console</a> [ 29 local-scope 30 load-inputs 31 result:&:<a href='084console.mu.html#L23'>console</a> <- new <a href='084console.mu.html#L23'>console</a>:type 32 *result <- put *result, events:offset, events 33 ] 34 35 def <a href='084console.mu.html#L35'>read-event</a> <a href='084console.mu.html#L23'>console</a>:&:<a href='084console.mu.html#L23'>console</a> -> result:<a href='084console.mu.html#L4'>event</a>, found?:bool, quit?:bool, <a href='084console.mu.html#L23'>console</a>:&:<a href='084console.mu.html#L23'>console</a> [ 36 local-scope 37 load-inputs 38 { 39 break-unless <a href='084console.mu.html#L23'>console</a> 40 current-event-index:num <- get *console, current-event-index:offset 41 buf:&:@:<a href='084console.mu.html#L4'>event</a> <- get *console, events:offset 42 { 43 max:num <- length *buf 44 done?:bool <- greater-or-equal current-event-index, max 45 break-unless done? 46 dummy:&:<a href='084console.mu.html#L4'>event</a> <- new <a href='084console.mu.html#L4'>event</a>:type 47 return *dummy, true/found, true/quit 48 } 49 result <- index *buf, current-event-index 50 current-event-index <- add current-event-index, 1 51 *console <- put *console, current-event-index:offset, current-event-index 52 return result, true/found, false/quit 53 } 54 switch # real event source is infrequent; avoid polling it too much 55 result:<a href='084console.mu.html#L4'>event</a>, found?:bool <- check-for-interaction 56 return result, found?, false/quit 57 ] 58 59 # variant of read-event for just keyboard events. Discards everything that 60 # isn't unicode, so no arrow keys, page-up/page-down, etc. But you still get 61 # newlines, tabs, ctrl-d.. 62 def <a href='084console.mu.html#L62'>read-key</a> <a href='084console.mu.html#L23'>console</a>:&:<a href='084console.mu.html#L23'>console</a> -> result:char, found?:bool, quit?:bool, <a href='084console.mu.html#L23'>console</a>:&:<a href='084console.mu.html#L23'>console</a> [ 63 local-scope 64 load-inputs 65 x:<a href='084console.mu.html#L4'>event</a>, found?:bool, quit?:bool, <a href='084console.mu.html#L23'>console</a> <- <a href='084console.mu.html#L35'>read-event</a> <a href='084console.mu.html#L23'>console</a> 66 return-if quit?, 0, found?, quit? 67 return-unless found?, 0, found?, quit? 68 c:char, converted?:bool <- maybe-convert x, text:variant 69 return-unless converted?, 0, false/found, false/quit 70 return c, true/found, false/quit 71 ] 72 73 def <a href='084console.mu.html#L73'>send-keys-to-channel</a> <a href='084console.mu.html#L23'>console</a>:&:<a href='084console.mu.html#L23'>console</a>, chan:&:<a href='075channel.mu.html#L40'>sink</a>:char, <a href='081print.mu.html#L16'>screen</a>:&:<a href='081print.mu.html#L16'>screen</a> -> <a href='084console.mu.html#L23'>console</a>:&:<a href='084console.mu.html#L23'>console</a>, chan:&:<a href='075channel.mu.html#L40'>sink</a>:char, <a href='081print.mu.html#L16'>screen</a>:&:<a href='081print.mu.html#L16'>screen</a> [ 74 local-scope 75 load-inputs 76 { 77 c:char, found?:bool, quit?:bool, <a href='084console.mu.html#L23'>console</a> <- <a href='084console.mu.html#L62'>read-key</a> <a href='084console.mu.html#L23'>console</a> 78 loop-unless found? 79 break-if quit? 80 assert c, [invalid <a href='084console.mu.html#L4'>event</a>, expected text] 81 <a href='081print.mu.html#L16'>screen</a> <- print <a href='081print.mu.html#L16'>screen</a>, c 82 chan <- <a href='075channel.mu.html#L60'>write</a> chan, c 83 loop 84 } 85 chan <- close chan 86 ] 87 88 def <a href='084console.mu.html#L88'>wait-for-event</a> <a href='084console.mu.html#L23'>console</a>:&:<a href='084console.mu.html#L23'>console</a> -> <a href='084console.mu.html#L23'>console</a>:&:<a href='084console.mu.html#L23'>console</a> [ 89 local-scope 90 load-inputs 91 { 92 _, found?:bool <- <a href='084console.mu.html#L35'>read-event</a> <a href='084console.mu.html#L23'>console</a> 93 break-if found? 94 switch 95 loop 96 } 97 ] 98 99 def <a href='084console.mu.html#L99'>has-more-events?</a> <a href='084console.mu.html#L23'>console</a>:&:<a href='084console.mu.html#L23'>console</a> -> result:bool [ 100 local-scope 101 load-inputs 102 return-if <a href='084console.mu.html#L23'>console</a>, false # fake events are processed as soon as they arrive 103 result <- interactions-left? 104 ] </pre> </body> </html>