Commit 552703aa authored by Armando I. Rivera's avatar Armando I. Rivera

Fixed output of module 'bas' file

parent e265256f
...@@ -18,6 +18,26 @@ UXLIBS: ...@@ -18,6 +18,26 @@ UXLIBS:
DWLIBS: DWLIBS:
MCLIBS: MCLIBS:
BAS: hash.bas
TO_BAS:
'
' Module hash
'
' This module lets you create memory stored hashes.
'
' Note that refValue and refThisValue return references to
' the actual value and great care should be paid handling
' these directly
'
const ErrorInvalidHandle = &H80001
const ErrorNoThisKey = &H80002
*/ */
#include <stdio.h> #include <stdio.h>
#define PRIME 211 #define PRIME 211
...@@ -658,3 +678,23 @@ besFUNCTION(relh) ...@@ -658,3 +678,23 @@ besFUNCTION(relh)
*Lval = NULL; *Lval = NULL;
} }
besEND besEND
SLFST HASH_SLFST[] ={
{ "shutmodu" , shutmodu },
{ "bootmodu" , bootmodu },
{ "versmodu" , versmodu },
{ "finimodu" , finimodu },
{ "New" , newh },
{ "SetValue" , sethv },
{ "refValue" , gethv },
{ "Exists" , ivhv },
{ "Delete" , delhk },
{ "Start" , starth },
{ "End" , endh },
{ "Next" , nexthk },
{ "Prev" , pervhk },
{ "ThisKey" , thishk },
{ "refThisValue", thishv},
{ "Release" , relh },
{ NULL , NULL }
};
\ No newline at end of file
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment