Five v0.9 — Harbour + Go fusion language
- Compiler: PP → Lexer → Parser → Analyzer → Gengo pipeline - Parser: 232/236 (98%) Harbour compatibility, registry-based dispatch - RTL: 351 Harbour-compatible functions - RDD: DBF/NTX/CDX engines with Rushmore bitmap optimization - Go Interop: IMPORT + pkg.Func() + obj:Method() with FastPath (15M calls/sec) - HB_FUNC API: Full Harbour C API compatible Go bridge - Concurrency: SPAWN/LAUNCH/GOROUTINE, <-, WATCH, PARALLEL FOR, ASYNC/AWAIT - Extensions: Multi-return, DEFER, Slice, f-string, Nil-safe ?:, CONST - Macro Compiler: Runtime AST parsing and evaluation - Debugger: TUI debugger with source display, breakpoints, stepping - FRB: Native + Pcode dual mode runtime binary - Tests: 13 packages ALL PASS Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>
This commit is contained in:
22
examples/test_frb_pcode.prg
Normal file
22
examples/test_frb_pcode.prg
Normal file
@@ -0,0 +1,22 @@
|
||||
// Test pcode FRB — loads pcode module (no Go compiler needed)
|
||||
FUNCTION Main()
|
||||
LOCAL pMod
|
||||
|
||||
? "=== FRB Pcode Mode Test ==="
|
||||
? ""
|
||||
|
||||
pMod := FrbLoad("mylib_pc.frb")
|
||||
IF pMod = NIL
|
||||
? "ERROR: Cannot load mylib_pc.frb"
|
||||
RETURN NIL
|
||||
ENDIF
|
||||
|
||||
? "Hello:", FrbDo(pMod, "HELLO", "World")
|
||||
? "Add:", FrbDo(pMod, "ADD", 100, 200)
|
||||
? "Factorial:", FrbDo(pMod, "FACTORIAL", 10)
|
||||
|
||||
FrbUnload(pMod)
|
||||
? ""
|
||||
? "=== Done (pcode mode, 175 bytes, no Go needed!) ==="
|
||||
|
||||
RETURN NIL
|
||||
Reference in New Issue
Block a user