|
Post by alexfish on Nov 13, 2023 15:53:44 GMT 1
Change the compiler at -c . I use tcc for test(it is fast) then opt for cc Aka gcc or clang
INCLUDE "hug.bac" REM ============================================== SUB Run() LOCAL txt$ = GRAB$(ed)
SAVE txt$ TO "myapp.bac" res$ = EXEC$("bacon -c -q -y -r -c tcc myapp.bac") IF INSTR(res$,"ready.") THEN res$ = CHOP$(MID$(res$,INSTR(res$,"ready.") + 6)) END IF
TEXT(ed2,"") TEXT(ed2,res$) END SUB REM ==============================================
win= WINDOW("BaCon",909,636)
but= BUTTON("RUN",100,30) CALLBACK(but,Run) ATTACH(win,but,3,3)
ed= EDIT(450,600) ATTACH(win,ed,3,33)
FONT(ed,"monospace 12px")
ed2= EDIT(450,600) ATTACH(win,ed2,456,33) FONT(ed2,"monospace 12px")
DISPLAY
Can be Improved = DIY
Have Fun + BR Alex
How about
IF FILEEXISTS("myapp.bac") THEN TEXT(ed,LOAD$("myapp.bac")) END IF
|
|