\ Copyright 2022 Bradley D. Nelson \ \ Licensed under the Apache License, Version 2.0 (the "License"); \ you may not use this file except in compliance with the License. \ You may obtain a copy of the License at \ \ http://www.apache.org/licenses/LICENSE-2.0 \ \ Unless required by applicable law or agreed to in writing, software \ distributed under the License is distributed on an "AS IS" BASIS, \ WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. \ See the License for the specific language governing permissions and \ limitations under the License. also internals : list-builtins ( voc ) >r 'builtins begin dup >link while dup >params r@ = if dup see. cr then 3 cells + repeat drop rdrop ; : list-from ( xt ) begin dup nonvoc? while dup >flags BUILTIN_FORK and if dup cell+ @ list-builtins then dup see. cr >link repeat drop ; e: check-case out: ENDOF out: OF out: ENDCASE out: CASE ;e e: check-locals out: +to out: to out: exit out: ; out: { out: (local) ;e e: check-highlevel-floats out: f.s out: f. out: #fs out: set-precision out: precision out: fvariable out: fconstant out: fliteral out: afliteral out: sf, ;e e: check-boot out: quit out: evaluate out: prompt out: refill out: tib out: accept out: echo out: z>s out: s>z out: r~ out: r| out: r" out: z" out: ." out: s" out: n. out: ? out: . out: u. out: binary out: decimal out: octal out: hex out: str out: #> out: sign out: #s out: # out: hold out: <# out: extract out: pad out: hld out: cr out: space out: emit out: bye out: terminate out: key? out: key out: type out: is out: defer out: +to out: to out: value out: throw out: catch out: handler out: K out: J out: I out: loop out: +loop out: leave out: UNLOOP out: ?do out: do out: next out: for out: nest-depth out: postpone out: recurse out: aft out: repeat out: while out: else out: if out: then out: ahead out: until out: again out: begin out: [char] out: char out: ['] out: ' out: used out: remaining out: fdepth out: depth out: fp0 out: rp0 out: sp0 out: #! out: \ out: ( ;e e: check-tier2-opcodes out: >flags out: >flags& out: >params out: >size out: >link& out: >link out: >name out: aligned out: align ;e e: check-tier1-opcodes out: nip out: rdrop out: */ out: * out: /mod out: / out: mod out: invert out: negate out: - out: rot out: -rot out: ?dup out: < out: > out: <= out: >= out: = out: <> out: 0<> out: bl out: nl out: 1+ out: 1- out: 2* out: 2/ out: 4* out: 4/ out: +! out: cell+ out: cells out: cell/ out: 2drop out: 2dup out: 2@ out: 2! out: cmove out: cmove> out: fill out: erase out: blank out: min out: max out: abs out: here out: allot out: , out: c, out: current out: #tib out: >in out: state out: base out: context out: latestxt ;e e: check-tier0-opcodes out: [ out: ] out: literal out: 0= out: 0< out: + out: U/MOD out: */MOD out: LSHIFT out: RSHIFT out: ARSHIFT out: AND out: OR out: XOR out: DUP out: SWAP out: OVER out: DROP out: @ out: SL@ out: UL@ out: SW@ out: UW@ out: C@ out: ! out: L! out: W! out: C! out: SP@ out: SP! out: RP@ out: RP! out: >R out: R> out: R@ out: EXECUTE out: CELL out: FIND out: PARSE out: CREATE out: VARIABLE out: CONSTANT out: DOES> out: IMMEDIATE out: >BODY out: : out: EXIT out: ; ;e e: check-float-opcodes out: FP@ out: FP! out: SF@ out: SF! out: FDUP out: FNIP out: FDROP out: FOVER out: FSWAP out: FROT out: FNEGATE out: F0< out: F0= out: F= out: F< out: F> out: F<> out: F<= out: F>= out: F+ out: F- out: F* out: F/ out: 1/F out: S>F out: F>S out: SFLOAT out: SFLOATS out: SFLOAT+ out: PI out: FSIN out: FCOS out: FSINCOS out: FATAN2 out: F** out: FLOOR out: FEXP out: FLN out: FABS out: FMIN out: FMAX out: FSQRT ;e e: check-files-dir out: READ-DIR out: CLOSE-DIR out: OPEN-DIR ;e e: check-files-dir-reverse out: OPEN-DIR out: CLOSE-DIR ;e e: check-files out: NON-BLOCK out: FILE-SIZE out: RESIZE-FILE out: REPOSITION-FILE out: FILE-POSITION out: READ-FILE out: WRITE-FILE out: RENAME-FILE out: DELETE-FILE out: CREATE-FILE out: OPEN-FILE out: FLUSH-FILE out: CLOSE-FILE out: BIN out: R/W out: W/O out: R/O ;e e: check-files-reverse out: R/O out: W/O out: R/W out: BIN out: CLOSE-FILE out: FLUSH-FILE out: OPEN-FILE out: CREATE-FILE out: DELETE-FILE out: RENAME-FILE out: WRITE-FILE out: READ-FILE out: FILE-POSITION out: REPOSITION-FILE out: RESIZE-FILE out: FILE-SIZE out: NON-BLOCK ;e e: check-blocks out: editor out: list out: copy out: thru out: load out: flush out: update out: empty-buffers out: buffer out: block out: save-buffers out: default-use out: use out: open-blocks out: block-id out: scr out: block-fid ;e e: check-vocabulary out: internals out: sealed out: previous out: also out: only out: transfer{ out: }transfer out: transfer out: definitions out: vocabulary ;e e: check-[]conds out: [IF] out: [ELSE] out: [THEN] out: DEFINED? ;e e: check-utils out: words out: vlist out: order out: see out: .s out: startswith? out: str= out: :noname out: forget out: dump out: spaces out: assert ;e e: check-snapshots out: reset out: revive out: startup: out: remember out: restore out: save ;e e: check-fileops DEFINED? open-dir [IF] out: ls [THEN] out: cat out: touch out: rm out: mv out: cp out: dump-file ;e e: check-ansi out: set-title out: page out: at-xy out: normal out: bg out: fg out: ansi ;e e: check-tasks out: start-task out: task out: pause out: tasks ;e e: check-args out: argv out: argc ;e e: check-imports out: needs out: required out: included? out: include out: included ;e e: check-allocation out: resize out: free out: allocate ;e e: check-phase1 out: structures check-highlevel-floats check-vocabulary check-[]conds check-boot ;e e: check-opcodes check-float-opcodes check-tier2-opcodes check-tier1-opcodes check-tier0-opcodes ;e e: check-desktop out: graphics check-args ;e e: check-filetools out: visual check-ansi check-blocks check-imports check-snapshots check-fileops out: streams out: ms check-tasks ;e e: check-asm out: asm ;e e: check-phase2 check-case check-locals check-asm check-utils ;e DEFINED? windows [IF] e: test-windows-forth-voclist internals ' graphics voclist-from out: graphics out: ansi out: editor out: streams out: tasks out: windows out: structures out: internalized out: internals out: FORTH ;e e: test-windows-forth-namespace ' forth list-from out: FORTH check-desktop check-filetools check-phase2 check-allocation out: default-key? out: default-key out: default-type check-files out: ok out: ms-ticks out: ms out: windows check-phase1 out: GetProcAddress out: LoadLibraryA out: WindowProcShim check-opcodes out: forth-builtins ;e [ELSE] DEFINED? posix [IF] e: test-posix-forth-voclist internals ' sockets voclist-from out: sockets out: internals out: graphics out: ansi out: editor out: streams out: tasks out: termios out: posix out: structures out: internalized out: internals out: FORTH ;e e: test-posix-forth-namespace ' forth list-from out: FORTH out: out: web-interface out: httpd out: telnetd out: sockets out: x11 check-desktop check-filetools check-phase2 out: form out: termios check-allocation out: ok out: pwd out: rmdir out: mkdir out: cd out: ms-ticks out: ms check-files-dir check-files out: default-key out: default-type out: posix check-phase1 out: DLSYM check-opcodes out: forth-builtins ;e [ELSE] e: test-esp32-forth-voclist internals ' ansi voclist-from out: ansi out: registers out: ansi out: editor out: streams out: tasks out: oled out: bluetooth out: rtos out: rmt out: interrupts out: sockets out: Serial out: ledc out: SPIFFS out: spi_flash out: SD_MMC out: SD out: WiFi out: Wire out: ESP out: structures out: internalized out: internals out: FORTH ;e e: check-esp32-platform out: riscv-assembler out: xtensa-assembler out: assembler out: ok out: LED out: OUTPUT out: INPUT out: HIGH out: LOW out: tone out: freq out: duty out: adc out: pin out: default-key? out: default-key out: default-type ;e e: check-esp32-builtins out: pinMode out: digitalWrite out: digitalRead out: analogRead out: pulseIn out: MS-TICKS check-files-reverse check-files-dir-reverse out: dacWrite out: MDNS.begin ;e e: check-esp32-bindings out: oled out: bluetooth out: rtos out: rmt out: interrupts out: sockets out: Serial out: ledc out: SPIFFS out: spi_flash out: SD_MMC out: SD out: WiFi out: Wire out: ESP out: read-dir ;e e: test-esp32-forth-namespace ' forth list-from out: FORTH out: camera-server out: camera out: telnetd out: bterm out: timers out: registers out: webui out: login out: out: out: web-interface out: httpd check-esp32-platform check-filetools check-phase2 check-esp32-bindings check-allocation check-phase1 check-esp32-builtins check-opcodes out: forth-builtins ;e [THEN] [THEN]
Legal: site web personnel sans commerce / personal site without seling