HKP - Hug Keyword Parser

[GatorDog]

Hi Peter,
Thanks for explanation about variables, etc...

Report_view = hug_widget_focus(STR$(Report_edit_))
PROPERTY(Report_view, "wrap-mode", 0)

When I add this I get an error. "undefined reference to hug_widget_focus"

I tried a "monkey see, monkey do" approach with this line- IMPORT "gtk_text_attributes_new(char*)" FROM lib$ TYPE voidbut that didn't get me anywhere.

rod

[Pjot]

Yes, you probably use "hug_imports" which obtains functions from HUG as a shared object.

Instead, you must use INCLUDE hug.bac which includes the code for internal administration.

Regards
Peter

[GatorDog]

HKP has forked off into BaconXref. I started a new thread to cover it.

rod

[bigbass]

This is an old tread
but I saw that a HUG key word parser GUI is still useful today
however in 2019 some things have changed and getting old code to compile
could be challenging I am not going to post a fixed version
but will post a diff to update the code to compile in 2019 leaving it "original"
thanks gatordog wherever you are you are not forgotten !

*HUG has changed also with a few new commands that are easy to add I added a few

Jul 26, 2011 at 10:51pm QuotePost Options Post by GatorDog on Jul 26, 2011 at 10:51pm
HKPx source

rod

Attachments:

HKPx.tar.gz


--- HKPx.bac 2011-07-26 22:47:52.000000000 -0700
+++ HKPx2.bac 2019-04-26 07:33:25.557192951 -0700
@@ -39,7 +39,7 @@
' *********************

' ** ! Edit /path/hug.bac for your setup ! **
-INCLUDE "/usr/share/BaCon/hug_imports.bac"
+INCLUDE "hug.bac"
'INCLUDE "/usr/share/BaCon/hug.bac", ATTACH, BUTTON, CALLBACK, DISABLE, DISPLAY, EDIT, ENABLE, ENTRY, FILEDIALOG, FOCUS, FONT, FRAME, GRAB$, HIDE, HUGLIB$, HUGOPTIONS, INIT, MSGDIALOG, PROPERTY, QUIT, SHOW, STOCK, SYNC, TEXT, WINDOW

INIT
@@ -84,7 +84,7 @@
CONST Single_quote$ = CHR$(39)
CONST Double_quote$ = "\""

-GLOBAL Filename$, Tmp$, Save_keyword$, Hug_basename$, Include$ TYPE STRING
+GLOBAL Filename$,  Save_keyword$, Hug_basename$, Include$ TYPE STRING
GLOBAL Filename_frame_width, Filename_frame_height, Tab_x, Tab_y TYPE NUMBER
GLOBAL Filename_frame_x, Filename_frame_y, Tmp, Index TYPE NUMBER
GLOBAL Btn_x, Btn_y, Edit_width, Edit_height, Edit_x, Edit_y TYPE NUMBER
@@ -462,8 +462,8 @@
DATA "DISABLE(", "DISPLAY", "DRAW("
DATA "EDIT(", "ENABLE(", "ENTRY("
DATA "FILEDIALOG(", "FOCUS(", "FONT(", "FRAME("
-DATA "GET(", "GRAB$("
-DATA "HIDE(", "HSEPARATOR(", "HUGLIB$(", "HUGOPTIONS("
+DATA "GET(", "GRAB$(", "GETCOLOR$("
+DATA "HIDE(", "HSEPARATOR(", "HUGLIB$(", "HUGOPTIONS(", "HSLIDER(", "HUGENTRY(",
DATA "IMAGE(", "INIT"
DATA "=KEY", "= KEY"
DATA "LINE(", "LIST("
@@ -472,11 +472,11 @@
DATA "OUT("
DATA "PASSWORD(", "PICTURE(", "PIXEL(", "PROGRESSBAR(", "PROPERTY("
DATA "QUIT"
-DATA "RADIO(", "REGISTER("
+DATA "RADIO(", "REGISTER(", "RESETKEY("
DATA "SCREENSIZE(", "SET(", "SHOW(", "SPIN(", "SQUARE(", "STOCK(", "SYNC"
DATA "TEXT(", "TIMEOUT(", "TOGGLE("
DATA "UNFOCUS("
-DATA "VSEPARATOR("
+DATA "VSEPARATOR(","VSLIDER("
DATA "WINDOW("

' *********************